Презентация на тему Оператор FOR в Turbo Pascal

счётчиком или
цикл с параметром. В нём важную роль

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

f, i: INTEGER;
BEGIN
Clrscr;

f:=1;
for i:=1 to 5 do
begin
f:=f*2;
end;
WRITELN (‘2^5 = ‘,f);
Readln;
End.

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.

запросить с клавиатуры

(‘Работа Фам’);
writeln (‘Введите 1 число');

readln (x);
for i:=2 to 20 do
begin
write (‘Введите след ч');
readln (y);
if y end;
writeln ('min=',x:6:2);
readln;
end.

дюймов в сантиметры (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.

n для любого вещественного числа а