Question

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

Answer 1

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.

c4d71d772dfe43f9d9d5be6163ae475c.docx

2edb6ecdb48915284b8977e077e73602.doc

Answer 2

rfr

Answer 3

как

Answer 4

рядом файлик появился doc

Answer 5

открывай его

Answer 6

спасибки