Ответы
Ответ дал:
0
Program fdf;
uses crt;
var a,i:real;
begin
readln(a);
I:=a;
while a<>-9999
do begin
readln(a);
if i<a then i:=a;
end;
writeln(i);
end.
(Для справки -9999 число для окончания цикла)
uses crt;
var a,i:real;
begin
readln(a);
I:=a;
while a<>-9999
do begin
readln(a);
if i<a then i:=a;
end;
writeln(i);
end.
(Для справки -9999 число для окончания цикла)
Ответ дал:
0
пожалуйста
Вас заинтересует
1 год назад
1 год назад
6 лет назад
6 лет назад
9 лет назад
9 лет назад
9 лет назад