Ответы на вопрос:
Const n = 5; var a: array[1..n] of integer; i: integer; s: real; begin s: =0; write('введите пять целых чисел: '); for i : = 1 to n do begin read(a[i]); s: =s+a[i] end; writeln('s = ',s); readln end.
Популярно: Информатика
-
Артём200670608.10.2020 10:09
-
20Sascha0719.04.2022 19:58
-
Мурочkина01.01.2022 16:05
-
НубИк1030.09.2021 13:00
-
шогвшвгвшр28.09.2021 00:03
-
liubovbalan17.04.2023 15:17
-
lamowitska15.08.2021 07:24
-
4236fjfjfuf05.04.2022 05:59
-
13018102.05.2020 05:13
-
Илья095608.06.2023 11:05