Информатика. Петрова М.В. - 37 стр.

UptoLike

ВУЗ: 

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

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

Рубрика: 

37
Продолжение приложения В
ему программы. Различают циклы с заданным и неизвестным числом
повторений. К последним относятся итерационные циклы, характеризующиеся
последовательным приближением к искомому значению с заданной точностью.
Если число повторений тела цикла заранее известно, то чаще всего
применяется оператор цикла с параметром:
FOR<параметр цикла>:=<нач. знач.>TO<кон. знач.>DO<оператор>
FOR<параметр цикла>:=<нач. знач.>DOWNTO<кон. знач.>DO<оператор>
Где <параметр цикла> – величина, которая изменяется в цикле
(переменная типа
Integer);
<нач. знач.> – величина, задающая начальное значение параметра цикла;
<кон. знач.> – величина, задающая конечное значение параметра цикла.
Шаг наращивания параметра цикла строго равен 1. При замене
зарезервированного слова TO на DOWNTO шаг наращивания параметра цикла
равен (-1).
3.1. Осуществить ввод с клавиатуры целого числа N и вычислить суммы
всех целых чисел от 1
до N.
Составим программу:
Var i,N,S: integer;
Begin
Write ('введите N'); Readln (N);
S:=0;
FOR i:=1 TO N DO
S:=S+i;
Writeln ('S=',S);
End.
3.2. Вычислить и вывести на печать значения функции )x+(a/a=y
223
при
x
изменяющемся от 0 до 3 с шагом 0,1.
Это цикл с заданным числом повторений, которое определяется по
формуле:
1h[+
/
)
x=](xn
0к
;
где
0
x
и
к
x
– соответственно начальное и конечное значение аргумента;
h
– шаг изменения аргумента.
Перед первым выполнением цикла необходимо задать начальное значение,
равное 0, а затем организовать 31 раз вычисление и печать значений функции.
При каждом новом выполнении цикла необходимо изменять аргумент на шаг
равный 0,1. Чтобы процесс был конечным, необходимо задать условие
окончания цикла.
Таким образом, для организации цикла необходимо:

Страницы