Установить сколько бит информации получим узнав по гороскопу мой друг рак
222
497
Ответы на вопрос:
Var a: array[1..100] of integer; i, n, s: integer; begin readln(n); s : = 0; for i : = 1 to n do begin readln(a[i]); s : = s + a[i]; end; writeln('s = ', s); end.
Популярно: Информатика
-
oksanayarockay18.06.2021 15:00
-
mai3115.06.2023 00:27
-
kisa175609.03.2023 05:35
-
baga2713.11.2021 19:28
-
саша1010326.03.2023 07:35
-
Ksyufenka01.08.2021 00:54
-
87766306266Данил07.06.2020 20:50
-
макс1728107.08.2022 04:49
-
yamarinaigorp00vfk07.01.2021 18:02
-
DanilSoldatkin08.01.2023 08:47