1.
Подсчитать
сумму чисел
|
for i:=1 to 5 do Sum:=Sum+h[i];
|
2.
Подсчитать
сумму четных чисел
|
for i:=1 to 5 do if h[i] mod 2 = 0 then Sum:=Sum+h[i];
|
3.
Увеличить
каждый элемент массива на 7
|
for
i:=1 to 5 do h[i]:=h[i]+7 ;
|
4.
Подсчитать
сумму положительных чисел
|
for i:=1 to 5 do if h[i]
>0 then Sum:=Sum+h[i];
|
5.
Подсчитать
сумму чисел, больших 150
|
for i:=1 to 5 do if h[i] >150 then Sum:=Sum+h[i];
|
6.
Подсчитать
количество нечетных чисел
|
for i:=1 to 5 do if h[i] mod 2 = 1 then k:=k+1
|
7.
Подсчитать
количество четных чисел и больших 5
|
for i:=1 to 5 do if (h[i] mod 2 = 0) and ( h[i] >0) then k:=k+1
|
8.
Подсчитать
количество четных чисел и больших 10
|
for i:=1 to 5 do if (h[i] mod 2 = 0) ( h[i] >0) then k:=k+1
|
Задача о нахождении максимального элемента стр53
|
|
пятница, 16 ноября 2018 г.
Подготовка к практической с19-23 ноября
Подписаться на:
Комментарии к сообщению (Atom)
План работы на 4 четверть
1 отметка ТЕ, кто не писал тест 9 и 11 апреля, будут писать. И к тесту я добавлю еще 2 балла (то что делали на уроке лес), они стоят в эл...
-
§ 21. Моделирование в задаче роста и убывания на уроке решали задачу параграф 21, будем ее дальше разбирать 21.1. Постановка за...
-
игры ссылка
-
На 6 баллов Напоминаю, что в цикле var убираем и описываем в сасом начале программы, где var i: INTEGER; Пример 7.6 Пример 7.7 Пример 7.8...
Комментариев нет:
Отправить комментарий