Pascal! дана последовательность целых чисел признак окончаний которой 0.найдите сумму всех элементов последовательности.
282
365
Ответы на вопрос:
//блок-схема во вложении. var a,s: integer; begin; a: =1; repeat readln(a); s: =s+a; until a=0; write(s); end.
Популярно: Информатика
-
кит21728.12.2020 18:04
-
арина113801.09.2020 11:31
-
ayaermek09.03.2021 20:23
-
ilyazhuravlev106.09.2021 02:31
-
McVano10.04.2021 15:43
-
123288829.03.2021 12:42
-
кэт228105.03.2023 04:50
-
zhannayachmenev30.10.2020 20:17
-
ник312325.05.2022 10:40
-
LidaDay25.03.2021 05:06