Ответы на вопрос:
Var a,s1,s2,i: integer; begin s1: =0; s2: =0; write('введите результаты первого пятиборца: '); for i: = 1 to 5 do begin read(a); s1: =s1+a; end; write('введите результаты второго пятиборца: '); for i: = 1 to 5 do begin read(a); s2: =s2+a; end; writeln('s1 = ',s1); writeln('s2 = ',s2); end. пример: введите результаты первого пятиборца: 1 2 3 4 5 введите результаты второго пятиборца: 5 6 7 8 9 s1 = 15 s2 = 35
Популярно: Информатика
-
bubles1307.01.2021 20:53
-
djgas1006.11.2022 19:01
-
opamaks2331.12.2022 04:37
-
25durak24.09.2022 06:18
-
маша275017.02.2023 14:19
-
vall331ukrnet09.05.2023 17:22
-
daulrtutegenov112.05.2022 00:20
-
АняГ1119.03.2020 12:18
-
bagfaver16.02.2023 07:08
-
abramson22819.03.2022 02:10