Даны два целых двузначных числа. Верное ли, что все цифры первого числа больше с...

November 2021 1 18 Report

Даны два целых двузначных числа. Верное ли, что все цифры первого числа больше соответствующих цифр второго числа?
Написать программу для Pascal

Answers & Comments

Gleb1Kosyrev

Verified answer

//Pascal ABC.NET 3.2 сборка 1318

Var
a,b:integer;
begin
readln(a,b);
if (a mod 10>b mod 10) and (a div 10>b div 10) then writeln('Да') else writeln('Нет');
end.

Пример ввода:
23
12
Пример вывода:
Да

1 votes Thanks 1

Answers & Comments

Verified answer

найти предел функции...

найти пределы функций...

Вычислить предел с помощью формулы Тейлора...

Сколько разных слов можно получить перестановкой букв слова КОНВЕРГЕНЦИЯ (буква ...

Каким количеством способов из колоды в 36 карт можно выбрать неупорядоченный наб...

Рассчитать значение выражения. Все неизвестные вводить с консоли. Написать прогр...

(7+x^2)...

найти производную функции...

Дано целое число N(>0). Найти сумму (1+2)^2+(2+3)^2+...+(N+(N+1))^2 Написать ...

Дан двумерный массив целых чисел N*M (задается рандомно). Вычислить сумму всех э...

рекомендуемые вопросы

Helpful Links

Helpful Social