Задать вопрос
ИнформатикаИнформатика
19 марта, 03:33

Нужен программный код для Паскаль.

Для последовательности целых чисел а, b, c все четные числа разделите на 2. Нечетные оставьте без изменений.

+3
Ответы (1)
  1. 19 марта, 06:52
    0
    Var a, b, c:integer;

    begin

    readln (a, b, c) ;

    if (a mod 2 = 0)

    a:=a div 2;

    if (b mod 2 = 0)

    b:=b div 2;

    if (c mod 2 = 0)

    c:=c dic 2;

    writeln (a,' ', b,' ', c) ;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Нужен программный код для Паскаль. Для последовательности целых чисел а, b, c все четные числа разделите на 2. Нечетные оставьте без ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Главная » Информатика » Нужен программный код для Паскаль. Для последовательности целых чисел а, b, c все четные числа разделите на 2. Нечетные оставьте без изменений.
Регистрация Забыл пароль