Program maxNumber;
varnum1, num2, max: integer;
beginwrite('Введите первое число: ');readln(num1);
write('Введите второе число: ');readln(num2);
if num1 > num2 thenmax := num1elsemax := num2;
writeln('Наибольшее число: ', max);
end.
Program maxNumber;
var
num1, num2, max: integer;
begin
write('Введите первое число: ');
readln(num1);
write('Введите второе число: ');
readln(num2);
if num1 > num2 then
max := num1
else
max := num2;
writeln('Наибольшее число: ', max);
end.