Добавить материал и получить бесплатное свидетельство о публикации в СМИ
Эл. №ФС77-60625 от 20.01.2015
Инфоурок / Информатика / Презентации / Оператор FOR в Turbo Pascal
ВНИМАНИЮ ВСЕХ УЧИТЕЛЕЙ: согласно Федеральному закону № 313-ФЗ все педагоги должны пройти обучение навыкам оказания первой помощи.

Дистанционный курс "Оказание первой помощи детям и взрослым" от проекта "Инфоурок" даёт Вам возможность привести свои знания в соответствие с требованиями закона и получить удостоверение о повышении квалификации установленного образца (180 часов). Начало обучения новой группы: 24 мая.

Подать заявку на курс
  • Информатика

Оператор FOR в Turbo Pascal

библиотека
материалов
Цикл со счётчиком (оператор for)
Оператор FOR Этот вид оператора цикла называют циклом со счётчиком или цикл с...
Задача 1 Возвести 2 в степень 5. Program stepen; Uses crt; VAR f, i: INTEGER;...
Задача 2 Вычислить сумму n чисел, вводимых с клавиатуры. program Summa_nch; u...
Задача 3 Выбрать наименьшее значение из 20 чисел, которые запросить с клавиат...
program min_iz20; uses crt; var i:integer; x,y : real; begin clrscr; writeln...
Задача 4. Составить программу для перевода расстояний из дюймов в сантиметры...
Домашнее задание. Программа вычисления степени с натуральным показателем n дл...
Решение. Программа вычисления степени с натуральным показателем n для любого...
9 1

Описание презентации по отдельным слайдам:

№ слайда 1 Цикл со счётчиком (оператор for)
Описание слайда:

Цикл со счётчиком (оператор for)

№ слайда 2 Оператор FOR Этот вид оператора цикла называют циклом со счётчиком или цикл с
Описание слайда:

Оператор FOR Этот вид оператора цикла называют циклом со счётчиком или цикл с параметром. В нём важную роль играет переменная-параметр, которая на каждом шаге цикла автоматически изменяет своё значение ровно на единицу – поэтому её и называют счётчиком. Инструкцию for можно реализовать двумя способами: Вариант 1 For счётчик:=НачальноеЗначение to КонечноеЗначение do Begin {инструкции} End; Ключевые слова for, do обозначают «для», «выполняй» соответственно. Строка, содержащая for . . . do, называется заголовком цикла, оператор, стоящий после do образует его тело. Очень часто тело цикла – составной оператор. Если тело цикла представлено одиночным оператором, то begin и end не пишутся. Вариант 2 For Счётчик:=НачальноеЗначение downto КонечноеЗначение do Begin {инструкции} End; Инструкции между begin и end выполняются столько раз, сколько определяет выражение [(НачальноеЗначение – КонечноеЗначение)+1] I:=N1,N2,1 Тело цикла

№ слайда 3 Задача 1 Возвести 2 в степень 5. Program stepen; Uses crt; VAR f, i: INTEGER;
Описание слайда:

Задача 1 Возвести 2 в степень 5. Program stepen; Uses crt; VAR f, i: INTEGER; BEGIN Clrscr; f:=1; for i:=1 to 5 do begin f:=f*2; end; WRITELN (‘2^5 = ‘,f); Readln; End.

№ слайда 4 Задача 2 Вычислить сумму n чисел, вводимых с клавиатуры. program Summa_nch; u
Описание слайда:

Задача 2 Вычислить сумму n чисел, вводимых с клавиатуры. program Summa_nch; uses crt; var i, n :integer; x, sum : real; begin clrscr; writeln (‘Введите количество чисел n’); readln (n); sum:=0; for i:=1 to n do begin write (‘Введите числа x’); readln (x); sum:=sum+ x; end; writeln (‘сумма чисел = ’, sum:6:2); readln; end.

№ слайда 5 Задача 3 Выбрать наименьшее значение из 20 чисел, которые запросить с клавиат
Описание слайда:

Задача 3 Выбрать наименьшее значение из 20 чисел, которые запросить с клавиатуры

№ слайда 6 program min_iz20; uses crt; var i:integer; x,y : real; begin clrscr; writeln
Описание слайда:

program min_iz20; uses crt; var i:integer; x,y : real; begin clrscr; writeln (‘Работа Фам’); writeln (‘Введите 1 число'); readln (x); for i:=2 to 20 do begin write (‘Введите след ч'); readln (y); if y<x then x:= y; end; writeln ('min=',x:6:2); readln; end.

№ слайда 7 Задача 4. Составить программу для перевода расстояний из дюймов в сантиметры
Описание слайда:

Задача 4. Составить программу для перевода расстояний из дюймов в сантиметры (1дюйм = 2,5 см) для значений длин от 1 до 20 дюймов. Пусть R1 – расстояние в дюймах, а R2 – это расстояние в см. Program perevod_rasst; Var R1 : integer ; R2 : real ; Begin Writeln (‘Работа ученика 9 класса Фамилия’); Writeln (‘Таблица перевода расстояний из дюймов в сантиметры’); For R1:=1 to 20 do Begin R2 := 2.5*R1; Write (R1); Writeln (‘-‘,R2); End; Readln; End.

№ слайда 8 Домашнее задание. Программа вычисления степени с натуральным показателем n дл
Описание слайда:

Домашнее задание. Программа вычисления степени с натуральным показателем n для любого вещественного числа а

№ слайда 9 Решение. Программа вычисления степени с натуральным показателем n для любого
Описание слайда:

Решение. Программа вычисления степени с натуральным показателем n для любого вещественного числа а Program dop_zadachka; Uses crt; Var i, n: integer; a, itog : real; Begin Clrscr; Writeln(‘Работа ученика 9 класса Фамилия’); Writeln(‘Программа – Возведение в степень’); Write(‘Введите основание а – ‘); Readln(a); Write(‘Введите показатель степени n – ‘); Readln(n); itog:=1; For i:=1 to n do itog:=itog*a; Writeln(‘Полученное число будет ‘,itog); Readln; End.

Краткое описание документа:

Тема является важной в изучении раздела "Программирование". Презентация разработана для работы с языком программирования Turbo Pascal. В предложенной Вашему вниманию презентации дается теоретический материал и разбирается несколько ключевых задач. Одну из задач можно дать для самостоятельного разбора или самостоятельного решения. Также на дополнительную оценку можно дать задание ученикам, которое заключается в составлении блок-схемы к задаче. В конце урока дети выполняют задачи на компьютере. Затем они проверяют работу выполненных программ. В конце презентации дается домашнее задание. На последнем слайде приведено его решение.

Автор
Дата добавления 01.12.2014
Раздел Информатика
Подраздел Презентации
Просмотров305
Номер материала 165490
Получить свидетельство о публикации

Выберите специальность, которую Вы хотите получить:

Обучение проходит дистанционно на сайте проекта "Инфоурок".
По итогам обучения слушателям выдаются печатные дипломы установленного образца.

ПЕРЕЙТИ В КАТАЛОГ КУРСОВ

Похожие материалы

Включите уведомления прямо сейчас и мы сразу сообщим Вам о важных новостях. Не волнуйтесь, мы будем отправлять только самое главное.
Специальное предложение
Вверх