Даны два числа А и В. Найти наибольшее из них а) составьте план написания программы; б) напишите код программы.
Var a, b: integer; begin readln(a, b); if a>b then writeln('Наибольшее число A'); if a=b then writeln('Числа равны'); if awriteln('Наибольшее число B'); end.