Помогите пожалуйста Нужно: 1) Cоставить программу поиска максимума двух чисел 2) составить программу поиска минимума двух чисел

Question

Помогите пожалуйста Нужно: 1) Cоставить программу поиска максимума двух чисел 2) составить программу поиска минимума двух чисел

Гость

Ответ(ы) на вопрос:

Accepted Answer

var a,b: real; begin write ('Введите 2 числа'); readln(a,b); if ab then writeln (a,'>',b) // максимальное else writeln (a,'=',b) ; // числа равны end.