• Определить, состоит, ли двузначное число, введенное с клавиатуры из одинаковых цифр.
    Turbo Pascal

Ответы 1

  • var n,n1,n2:integer;begin;readln(n);n1:=n mod 10;n:=n div 10;n2:=n mod 10;if n1=n2 then writeln('Y') else writeln('N');end.
    • Автор:

      costa
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

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

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

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