Склавиатуры вводится числа . завершение ввода - число 0. найдите сумму введённых чисел.

ВикторияНяшка123 ВикторияНяшка123    1   20.07.2019 08:10    0

Ответы
ПАПА1111111111 ПАПА1111111111  03.10.2020 08:37
var
a,k:integer;
begin
k:=0;
repeat  
readln(a);
k:=k+a;
until a = 0;
writeln(k);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика