Информатика. Часть 1. Мойзес О.Е - 80 стр.

UptoLike

ВУЗ: 

ТПУ | Томск

Составители: 

Рубрика: 

80
for i:=n1 downto n2 do <оператор>,
где i – параметр цикла; n1 и n2 – начальные и конечные значения
параметра цикла; <оператор> – тело цикла (простой или составной
операторы). Параметры i, n1, n2 должны иметь один и тот же тип, кроме
real, шаг параметра цикла всегда 1.
Цикл действует таким образом. Параметру i присваивается
начальное значение n1 и сравнивается со значением n2. До тех пор, пока
параметр i меньше или равен конечному значению n2 (в первом
варианте) или больше, или равен n2 (во втором варианте), выполняются
операторы циклической части; в противном случае происходит выход
из цикла.
Примечание:
1. Внутри цикла нельзя изменять начальное (n1) и конечное (n2)
значения параметра цикла, а также само значение i.
2. После завершения цикла значение параметра i становится
неопределенным (
т.е. ничему неравным), за исключением выхода из
цикла при помощи GOTO.
3. Во всех трех операторах цикла внутри цикла можно
использовать операторы IF, GOTO. Разрешается в любой момент
выходить из цикла, не дожидаясь его завершения. Но запрещено при
помощи этих операторов передавать управление извне цикла внутрь
цикла.
Пример: Рассмотрим расчет теплоемкости с использованием
оператора FOR.
Program Tepl;
var a,b,c,Cp:real;
T,h,i:integer;
Begin
writeln('Введи a,b,c=');
readln(a,b,c);
T:=200; h:=50;
for i:=1 to 13 do
begin
Cp:=a+b∗T+c∗T∗T;
writeln('T=',T:3,' Cp=',Cp:7:2);
T:=T+h;
end;
End.
Параметр цикла i изменяется от 1 до 13, т.к. на заданном
интервале температуры от 200 до 800 К с шагом 50 К должно быть
вычислено тринадцать значений теплоемкости.

Страницы