Составьте программу с использованием команды ветвления для решения одной из следующих (выбор осуществляется преподавателем):
1.1. по номеру месяца определить количество дней в нем (в невисокосном году).
1.2. по номеру месяца определить время года.
1.3. по номеру дня недели определить количество занятий.
1.4. по числу лет определить является ли человек школьником, пенсионером и т.п.
1.5. по номеру класса определить в начальной школе, среднем звене или в старших классах обучается ученик.
1.6. по номеру группы определить на каком курсе учится студент.
1.7. по числу текущего месяца определить день недели.
277
425
Ответы на вопрос:
var a,b,sum: integer; arr : array [0..7] of integer; begin sum: =0; write('введите элементы массива : '); for a: =0 to 7 do begin read(b); arr[a]: =b; end; for a: =0 to 7 do begin if arr[a]< 0 then sum: =sum+arr[a]; end; writeln('сумма отрицательных элементов массива = ',sum); end.
Популярно: Информатика
-
мадина48814.05.2020 08:42
-
maZIK00718.09.2022 13:16
-
Nasty2Tyan304.04.2023 09:11
-
kseniy2000103.12.2021 22:40
-
VADIMSTRENDG20.04.2021 20:55
-
Kononovichlika14.09.2021 21:51
-
Яркий201725.03.2021 04:33
-
pandaswomenp08cc409.01.2022 16:32
-
иван115906.01.2021 07:57
-
Taras22901.07.2021 06:08