Ответы на вопрос:
1.встать с кровати. 2.заправить кровать. 3.взять гантели. 4.руки в сторону. 5.руки к себе.и повторять 3-4раза 6.положить гантели.
Const k = 10; var a: array[1..k] of integer; i: integer; sr: real; begin write('исходный массив: '); for i: = 1 to k do begin a[i]: =random(21)-10; write(a[i],' '); sr: =sr+a[i]; end; sr: =sr/k; writeln; writeln('среднее арифметическое: ',sr); write('переработаный массив: '); for i: = 1 to k do begin if a[i]< sr then a[i]: =0 else a[i]: =5; write(a[i],' '); end; end.
Популярно: Информатика
-
497701.05.2022 11:41
-
anyakoi06.11.2020 15:05
-
ivanovaa75011.04.2021 23:39
-
85369217.10.2021 02:56
-
vikap88813.02.2022 22:35
-
Кобра22832212.03.2022 03:10
-
haroldyush23.09.2020 16:53
-
sonua310.06.2022 17:15
-
МаркЛеткеман11.08.2022 01:16
-
Fox0081104.02.2022 02:17