Информатика | 10 - 11 классы
Ввели трехзначное число, определить есть в нем повторяющиеся цифры.
Паскаль.
Дано трехзначное число?
Дано трехзначное число.
Вывести порядковый номер его минимальной цифры.
Паскаль.
Дано трехзначное число?
Дано трехзначное число.
Найти сумму цифр числа.
(Написать программу на языке Паскаль).
Вы ввели трехзначное число?
Вы ввели трехзначное число.
Затем ввели любую цифру.
Составьте программу, определяющую, есть ли в этом числе данная цифра.
И объясните.
Вывести на экран все трехзначные числа в которых хотя бы две цифры повторяются задачка в паскале?
Вывести на экран все трехзначные числа в которых хотя бы две цифры повторяются задачка в паскале.
Вы ввели трехзначное число?
Вы ввели трехзначное число.
Затем ввели любую цифру.
Составьте программу, определяющую, есть ли в этом числе данная цифра.
Паскаль?
Паскаль.
1) Дано трехзначное число, нужно найти число, полученное при прочтении его цифр справа налево.
2) Дано трехзначное число.
В нем зачеркнули последнюю справа цифру и приписали ее в начале.
Найти полученное число.
3) Дано трехзначное число.
Найти число, полученное при перестановке первой и второй цифр заданного числа.
Дано натуральное число ?
Дано натуральное число .
Определить есть ли в нем цифра а Написать с постусловием язык Паскаля !
Дано целое число?
Дано целое число.
Определить сколько в нем цифр 5.
Написать программу в Паскаль АВС.
Дано целое число, найдите в нем повторяющиеся цифры ; выведите эти цифры и их количество( на Паскале)?
Дано целое число, найдите в нем повторяющиеся цифры ; выведите эти цифры и их количество( на Паскале).
Ввести трехзначное число ?
Ввести трехзначное число .
Вычислить корень квадратный второй цифры(паскаль).
Вопрос Ввели трехзначное число, определить есть в нем повторяющиеся цифры?, расположенный на этой странице сайта, относится к категории Информатика и соответствует программе для 10 - 11 классов. Если ответ не удовлетворяет в полной мере, найдите с помощью автоматического поиска похожие вопросы, из этой же категории, или сформулируйте вопрос по-своему. Для этого ключевые фразы введите в строку поиска, нажав на кнопку, расположенную вверху страницы. Воспользуйтесь также подсказками посетителей, оставившими комментарии под вопросом.
Var e : Integer ;
begin
Write('Введите число : ') ; Readln(e) ; if ((e div 100) = (e mod 100 div 10)) or ((e div 100) = (e mod 10)) or ((e mod 100 div 10) = (e mod 10)) then Write('В числе ', e, ' есть повторяющиеся цифры!
') else Write('В числе ', e, ' нет повторяющихся цифр') ; Readln ;
end.