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

Составим программу на языке программирования Паскаль, для решения поставленной задачи:

programm naibolsheechislo;

var a, b, max: integer;

begin

writeln ('Придумайте и введите с клавиатуры значение первой переменной А');

readln (a);

writeln ('Придумайте и введите с клавиатуры значение второй переменной В');

readln (b);

if a > b then

max: = a;

writeln ('Наибольшее из введенных чисел равно',max);

else

if b > a then

max: = b;

writeln ('Наибольшее из введенных чисел равно',max);

else 

writeln ('Вы ввели два равных числа');

end.

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

Спасибо0