Задать вопрос
22 июня, 17:52

Написать программу (на ABC pascal), которая находит сумму четных цифр

и произведение нечетных чисел

в диапазоне от 1 до 10.

+4
Ответы (1)
  1. 22 июня, 19:26
    0
    Как-то так, если синтаксис помню:

    sum : = 0;

    mul : = 1;

    for index : = 1 to 10 do

    begin

    if (index mod 2 = 0) then

    begin

    sum : = sum + index;

    end;

    else

    begin

    mul : = mul * index;

    end;

    end;
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Написать программу (на ABC pascal), которая находит сумму четных цифр и произведение нечетных чисел в диапазоне от 1 до 10. ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы