С клавиатуры вводят два целых числа.У какого числа заключительный разряд (единица)

С клавиатуры вводят два целых числа.У какого числа заключительный разряд (единица) меньше


Задать свой вопрос
2 ответа
Var
  a,b,d:integer;

begin
  Read(a,b);
  d:=a mod 10 - b mod 10;
  if dlt;0 then Writeln('Разряд единиц меньше у 1-го числа')
  else
    if dgt;0 then Writeln('Разряд единиц меньше у 2-го числа')
    else Writeln('Разряды единиц у обоих чисел равны')
end.
1 0 / x 1 0 * lt;-gt; 1 0 / x 1 0 * - xlt;0 20 2 С/П /-/ xlt;0 25 1 С/П 0 С/П

Выводит 1, 2 или 0, если заключительные разряды одинаковы.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт