• Написать функцию, которая сравнивает два целых числа и возвращает результат сравнения в виде знака: >, < или = Pascal ABC

Ответы 1

  • function Compare(a,b:integer):char;begin  if a<b then Compare:='<'  else if a=b then Compare:='='  else Compare:='>'end;var  x,y:integer;begin  Write('Введите два числа через пробел: ');  Readln(x,y);  Writeln(x,Compare(x,y),y)end.
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years