ВУЗ:
Составители:
11
+
>−
−<+
=
случаепротивномвx
xеслиx
xеслиx
z
,1
1,1
8,0,)(sin1
7,1
.
2.15. Если среди трех чисел
zy
x
,,
имеется хотя бы одно четное, то найти
максимальное число, иначе − минимальное.
2.16. Ввести два числа
a и b . Меньшее заменить полусуммой, а большее
удвоенным произведением.
3. ПРОГРАММИРОВАНИЕ АЛГОРИТМОВ ЦИКЛИЧЕСКОЙ
СТРУКТУРЫ
Алгоритм, в котором вычисления повторяются по одной и той же сово-
купности формул, называется циклическим алгоритмом.
В языке Турбо Паскаль имеются три различных оператора, с помощью
которых можно запрограммировать повторяющиеся фрагменты программ: с па-
раметром, с предусловием и с постусловием.
Использование циклов позволяет существенно сократить схему алгоритма
и длину соответствующей ему программы. Различают циклы с заданным и не-
известным числом повторений. К последним относятся итерационные циклы,
характеризующиеся последовательным приближением к искомому значению с
заданной точностью.
Если число повторений тела цикла заранее известно, то чаще всего при-
меняется оператор цикла с параметром:
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. Вычислить и вывести на печать значения функции
)/(
223
xaay += при
x
, изменяющемся от 0 до 3 с шагом 0,1.
Страницы
- « первая
- ‹ предыдущая
- …
- 9
- 10
- 11
- 12
- 13
- …
- следующая ›
- последняя »