var n, number, max:integer;
begin
n := 3;
while n > 0 do
readln(number);
if n = 3 then max := number
else if max < number then max := number;
n := n - 1;
end;
writeln('Максимальное число = ', max);
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Verified answer
var n, number, max:integer;
begin
n := 3;
while n > 0 do
begin
readln(number);
if n = 3 then max := number
else if max < number then max := number;
n := n - 1;
end;
writeln('Максимальное число = ', max);
end.