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

Maryana1069 Maryana1069    3   22.07.2019 10:20    2

Ответы
5Артём 5Артём  13.08.2020 20:56
Var a,b: real;
begin
  write ('Введите 2 числа');
  readln(a,b);
  if a<b then writeln (a,'<',b) //минимальное
  else if a>b then writeln (a,'>',b) // максимальное
    else writeln (a,'=',b) ; // числа равны
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика