Найти сумму трёх целых чисел. использовать цикл с предусловием !

Daniilsukhankin2014 Daniilsukhankin2014    3   19.07.2019 09:40    0

Ответы
SERGUES SERGUES  03.10.2020 07:46
Var
a,i,r:byte;
begin
i:=1;
while i <= 3 do begin
readln(a);
r:=r+a;
i:=i+1;
end;
writeln(r);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика