Программирование на языке высокого уровня TURBO PASCAL. Краснов С.В. - 29 стр.

UptoLike

ВУЗ: 

УлГТУ | Ульяновск

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

Рубрика: 

29
Здесь WHILE (Пока), DO (выполнить) – служебные слова.
До начала циклов с предусловием и постусловием необходимо указывать
начальное значение управляющей переменной.
Пример использования цикла с предусловием
Задача № 4. Составить программу для вычисления значения функции y =
ax
2
. Переменная х изменяется от 5 до 25 с шагом 1, полученный результат
вывести на экран.
Программа решения задачи имеет вид:
program pred5; {Заголовок программы}
var {Раздел описания переменных}
x:integer;
a,y:real;
begin
writeln ('Введи параметр a '); {Вывод комментария}
readln (a); {Ввод с клавиатуры значения a}
y:=0; {Обнуление переменной для накапливания
суммы}
x:=5; {Задание начальных условий}
while x<=25 do {Начало цикла с
предусловием}
begin;
y:=a*x*x; {Тело цикла с предусловием}
x:=x+1; {Изменение переменной цикла на величину
шага}
end; {Конец цикла}
writeln ('Функция равна ',y); {Вывод результата}
end. {Конец программы}
(4)
(3)
(2)
I > Iк
опер,1
опер, 2
(1)
I: = Iн; Iк: = 10; dI = 1;
WHILE I < =Iк DO
BEGIN
Опер_1;
Опер_2;
I: = I + dI;
END.
Подготовка
цикла
I: = I + dI

Страницы