Даны два числа а и в. найти наибольшее из них а) составьте план написания программы; б) напишите код программы.

Var
a, b: integer;
begin
readln(a, b);
if a>b then
writeln('Наибольшее число A');
if a=b then
writeln('Числа равны');
if a<b then
writeln('Наибольшее число B');
end.