Ответы
Ответ дал:
0
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.
a,i,r:byte;
begin
i:=1;
while i <= 3 do begin
readln(a);
r:=r+a;
i:=i+1;
end;
writeln(r);
end.
Приложения:
Ответ дал:
0
rfr
Ответ дал:
0
как
Ответ дал:
0
рядом файлик появился doc
Ответ дал:
0
открывай его
Ответ дал:
0
спасибки
Вас заинтересует
2 года назад
2 года назад
7 лет назад
7 лет назад
9 лет назад
9 лет назад
10 лет назад