Склавиатуры вводят последовательность чисел до тех пор пока не будет введено число 3. требуется найти сумму введенных чисел
208
262
Ответы на вопрос:
Var s, n: real; begin s : = 0; n : = 0; repeat s : = s + n; readln(n); until n = 3; writeln(s); end.
Популярно: Информатика
-
zhaslanovd26.01.2020 23:32
-
diana115729.11.2021 14:08
-
умник162716.09.2022 11:05
-
FEDY200599999M06.11.2020 03:41
-
Romanus1107.01.2022 14:17
-
Masha815703.10.2022 10:45
-
mashkax28марічка02.06.2022 04:50
-
abroe26.10.2021 03:52
-
Columbos27.04.2020 03:14
-
фокс3627.08.2020 13:50