Исправленный код
var
a,b,max: integer;
begin
writeln('Введите два целых числа');
read(a,b);
if a>b then max:=a
else max:=b;
writeln('Наибольшее число ', max);
end.
var
a,b,max: integer;
begin
writeln('Введите два целых числа');
read(a,b);
if a>0 then
max:=a
else
max:=b;
writeln('Наибольшее число', max);
end. Так будет правильно, но смысл программы утерян полностью. Если нужно найти наибольшее число, то это другой код будет, этот вообще не понятно что делает
Объяснение:
