Найти сумму трёх целых чисел. использовать цикл с предусловием Срочноооооо!!!
Найти сумму трёх целых чисел.
использовать цикл с предусловием
Срочноооооо!!!
Ответ(ы) на вопрос:
Гость
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.
Не нашли ответ?
Похожие вопросы