Информатика | 10 - 11 классы
Даны два целых двузначных числа.
Верное ли, что все цифры первого числа больше соответствующих цифр второго числа?
Написать программу для Pascal.
Дано натуральное число?
Дано натуральное число.
Проверить, является ли число двузначным, и равна ли первая цифра числа второй.
Написать программу в Free Pascal : Дано целое число неизвестной размерности?
Написать программу в Free Pascal : Дано целое число неизвестной размерности.
Найти сумму цифр его составляющих.
Дано целое число N?
Дано целое число N.
Составить программу нахождения количества цифр числа (Pascal ABC).
Дано целое двузначное число?
Дано целое двузначное число.
Составить программу которая определяет входит ли в него цифра 4.
Дано целое положительное четырехзначное число?
Дано целое положительное четырехзначное число.
Напишите программу, позволяющую определить двузначное число, в котором число десятков соответствует первой цифре заданного числа, а число единиц - последней.
Например : 3234 = > ; 34.
PASCAL ABC, программа?
PASCAL ABC, программа!
Вводится целое положительное число.
Найти наименьшую нечетную цифру в числе.
Если в числе нет нечетных цифр, то вывести надпись "В числе нет нечетных цифр".
1. Дано трехзначное число?
1. Дано трехзначное число.
Написать программу (Pascal), которая «переставляет» первую цифру числа на самое последнее место.
Помогитe составить программу на Free Pascal?
Помогитe составить программу на Free Pascal.
Дано натуральное число.
Верно ли, что произведение его цифр не больше 50.
Дано целое число N?
Дано целое число N.
Определите количество нечётных цифр в данном числе.
(Pascal).
Дано двузначное число?
Дано двузначное число.
Определить, кратна ли трем сумма его цифр?
( Pascal).
Вопрос Даны два целых двузначных числа?, расположенный на этой странице сайта, относится к категории Информатика и соответствует программе для 10 - 11 классов. Если ответ не удовлетворяет в полной мере, найдите с помощью автоматического поиска похожие вопросы, из этой же категории, или сформулируйте вопрос по-своему. Для этого ключевые фразы введите в строку поиска, нажав на кнопку, расположенную вверху страницы. Воспользуйтесь также подсказками посетителей, оставившими комментарии под вопросом.
/ / 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
Пример вывода :
Да.