Задать вопрос
1 сентября, 21:10

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

+3
Ответы (1)
  1. 1 сентября, 23:08
    0
    Program n_10;

    var a, b, c, x: integer; R:Boolean;

    begin

    WriteLn ('Введите трехзначное число>>') ;

    ReadLn (x) ;

    a:=x div 1000;

    b: = (x mod 1000) div 100;

    c:=x mod 10;

    R: = (a*b*c) mod 2 = 0;

    WriteLn ('Произведение цифр четно?', R)

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Дано трехзначное число X. Проверить, будет ли произведение его цифр четным числом ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Дано трёхзначное число проверить, будет ли сумма его цифр чётным или не чётным числом.
Ответы (1)
1. Дано трехзначное число. Найти число единиц в нем число десятков в нем сумму его цифр произведение его цифр 2. Дано трехзначное число. Найти число. Найти число, полученное при прочтении его цифр справа налево
Ответы (1)
Паскаль. 1) Дано трехзначное число, нужно найти число, полученное при прочтении его цифр справа налево. 2) Дано трехзначное число. В нем зачеркнули последнюю справа цифру и приписали ее в начале. Найти полученное число. 3) Дано трехзначное число.
Ответы (1)
Помогите решить! 1) Дано натуральное трехзначное число N. Определить сумму и произведение его цифр. 2) Дано натуральное трехзначное число N. Найдите число, образованное перестановкой цифр исходного числа в обратном порядке.
Ответы (1)
Дано натуральное число: определить а) количество цифр в нем б) сумму его цифр в) произведение его цифр г) среднее арифметическое его цифр д) сумму квадратов его цифр е) сумму кубов его цифр ж) его первую цифру з) сумму его первой и последней цифр
Ответы (1)