Регистрация
Войти
Стать экспертом Правила
Информатика

Информатика - Введены два числа нужно определить больше из них либо написать что числа равны

ОТВЕТЫ
Решение:
 
var
    a,b:integer;
begin
   write(Введите два числа: );readln(a,b);
   if agt;b then writeln(Первое число больше, чем второе)
             else  if alt;b then writeln(Второе число больше, чем первое)
                                else writeln(Числа равны);
end.      

Проверил на Паскале, работает 100

43
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам