Ответы на вопрос:
const z = 10; var a: array[1..z] of integer; i, n, s: integer; begin readln(n); for i : = 1 to z do begin a[i] : = random(100); write(a[i], ' '); if(a[i] > n) then s : = s + a[i]; end; writeln; writeln('сумма эл. > ', n, ' : ', s); end.
Популярно: Информатика
-
АннаЛео14711.10.2021 16:44
-
hdhsjs13.01.2023 00:57
-
Trumpumpum17.07.2021 11:59
-
Алина1111778488484828.04.2022 02:37
-
sladkoe10217.01.2023 18:19
-
Лесолес17.07.2021 12:41
-
Ане4ка2116.03.2020 17:07
-
аня20041419.09.2020 16:20
-
Denchik1507006.07.2021 00:38
-
roncray102.02.2023 00:50