Проблемно-ориентированная информатика химико-технологических процессов. Кравцов А.В - 24 стр.

UptoLike

ВУЗ: 

ТПУ | Томск

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

Рубрика: 

i:=i+1;
y:=y∗x/i {Расчет следующего слагаемого.}
UNTIL y<e;
writeln(’Cумма бесконечного ряда =’, S:10:6);
END.
Пример 2.5.6.
PROGRAM sum;
VAR i,n:integer; s:real;
BEGIN
write('укажите число n ');
readln(n); s:=0;
FOR i:=n DOWNTO 1 DO s:=s+i;
writeln('значение суммы ',s);
END.
Таблица 2.5.1
Способы программирования циклов различной структуры
(на примере расчета суммы
S
a
i
i
n
=
=
∑
2
1
).
Фрагмент блок – схемы Операторы
1. Цикл с предварительным условием
i<=n
Да
S=0
i=1
S=S+a/i
i=i+1
2
Нет
а) С использованием
цикла
WHILE ... DO.
S:=0; i:=1;
WHILE i<=n DO
BEGIN
S:=S+a/sqr(i);
i:=i+1
END;
б) С использованием
операторов
IF ... THEN и GOTO.
S:=0; i:=1;
1:
IF i<=n THEN
BEGIN
S:=S+a/sqr(i);
i:=i+1;
GOTO 1
END;
24

Страницы