сервис вопросов и ответовДано трёхзначное число. Напишите программу, которая определяет:
5-9 класс|
|
а) есть ли среди цифр заданного целого трёхзначного числа одинаковые;
пример входных данных: 123; 121; 222
пример выходных данных: нет; да; да
б) является ли число "перевёртышем", т.е. числом, десятичная запись которого читается одинаково слева направо и справа налево.
09091979lari
08 нояб. 2013 г., 12:04:40 (10 лет назад)
Ivan99
08 нояб. 2013 г., 13:07:10 (10 лет назад)
var x,a,b,c:integer;
begin
writeln ('введи трехзначное число');
readln (x);
c:=x mod 10;
b:=x div 10 mod 10;
a:=x div 100 mod 10;
if a=с then writeln ('Число является перевертышем')
else writeln ('число не является перевертышем');
if (a=b) or (a=c) or (b=c) then writeln ('да')
else writeln ('нет');
end.
Ответить
Другие вопросы из категории
ПОЖАЛУЙСТА!!! В классе 1010 мальчиков, что составляет 101000% от численности всего класса. Сколько в классе девочек и какова общая численность
класса? Ответы получите в двоичной системе, в которой записаны все приведенные значения.
Помогите пожаааалуйста ;-( ;-(
1) Приведите пример циклического алгоритма:а) из литературного произведенияб)из любой предметной области изучаемой в школе.
2) Ежегодный прирост рыбы в пруду составляет 15%. Запасы рыбы оценены в А тонн. Ежегодный план отлова В тонн. Наименьший запас рыбы составляет С тонн (запас ниже С тонн уже не восстанавливается) .Составьте БЛОК СХЕМУ алгоритма для подсчета кол-ва лет, в течение которых можно выдерживать заданный план.
Что если шрифт с Times New Roman не меняется на Vivaldi? В чём дело?
P.S. всё это в программе Microsoft Office Word.
Напишите пожалуйста блок схему
Очень прошу помогите
Найти сумму первых n натуральных чисел кратных 3.
Читайте также
Помогите по программе paskal : 1.дано целое число.напишите программу которая уменьшает на 2 модуль этого числа и выводит на экран монитора
результат
2.дано целое число.напишите,программу которая выводит на экран последнюю цифру данного числа,затем возводит ее в квадрат и выводит на экран монитора результат
1.Дано целое число составить программу которая определяет оканчивающие данное число цифрой семь.
2.Дано 2х значное число составить программу с помощью которой можно отпределить входит ли в это число цифра шесть.
Дано трехзначное число.Напишите программу,которая определяет:является ли число "перевертышем",т.е. числом,десяти на запись которого читается одинаково
слева направо и справа налево
Дано трехзначное число. напишите программу, которая определяет:
1) есть ли среди цифр заданного трехзначного числа одинаковые;
Пример входных данных
123 нет
121 да
222 да
2) является ли число '' перевертышем" , т.е. числом , десятичная запись которого читается одинаково слева направо и справа налево.
Пример входных данных
122 нет
121 перевертыш
222 перевертыш
Пожалуйста с примером!!!
Заранее большое спасибо
1)Напишите программу,которая в последовательности целых чисел определяет количество трехзначных чисел,не кратных 5 и 7 и не заканчивающ
ихся 0 или 1.
Программа получает на вход целые числа от -3000 до 3000.
2)Напишите программу,которая в последовательности целых чисел вычисляет среднее арифметическое среди двухзначных чётных чисел,делящихся на 3.
НУЖНО СЕГОДНЯ! 66 БАЛЛОВ!
Вы находитесь на странице вопроса "Дано трёхзначное число. Напишите программу, которая определяет:", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.