Как составить программу на Паскале, которая для десяти чисел, введенных с клавиатуры, будет складывать все отрицательные и умножать положительные?

Информатика 8 класс Алгоритмы и программирование на Паскале программа на Паскале сложение отрицательных чисел умножение положительных чисел ввод чисел с клавиатуры алгоритм Паскаль информатика 8 класс Новый

Чтобы составить программу на языке Паскаль, которая будет выполнять заданные операции с десятью числами, следуйте этим шагам:

1. Объявление переменных: Нам нужно объявить переменные для хранения чисел, суммы отрицательных чисел и произведения положительных чисел.
2. Ввод данных: Мы будем использовать цикл для ввода десяти чисел с клавиатуры.
3. Условия для обработки чисел: Внутри цикла проверим, является ли число положительным или отрицательным, и будем выполнять соответствующие операции.
4. Вывод результата: После завершения цикла выведем сумму отрицательных чисел и произведение положительных чисел.

Теперь давайте напишем саму программу:

program SumAndProduct;

var
    num: integer; // текущее число
    sumNegative: integer; // сумма отрицательных чисел
    productPositive: integer; // произведение положительных чисел
    i: integer; // счетчик

begin
    sumNegative := 0; // инициализация суммы отрицательных чисел
    productPositive := 1; // инициализация произведения положительных чисел

    // Цикл для ввода 10 чисел
    for i := 1 to 10 do
    begin
        write('Введите число ', i, ': ');
        readln(num); // ввод числа

        // Проверка на положительность или отрицательность
        if num < 0 then
            sumNegative := sumNegative + num // если число отрицательное, добавляем к сумме
        else if num > 0 then
        begin
            productPositive := productPositive * num; // если число положительное, умножаем
        end;
    end;

    // Вывод результатов
    writeln('Сумма отрицательных чисел: ', sumNegative);
    writeln('Произведение положительных чисел: ', productPositive);
end.

Объяснение кода:

• Мы объявляем необходимые переменные.
• Инициализируем переменные для суммы и произведения.
• С помощью цикла for запрашиваем у пользователя ввод десяти чисел.
• Внутри цикла проверяем, является ли число отрицательным или положительным, и выполняем соответствующие операции.
• После завершения цикла выводим результаты на экран.

Таким образом, программа будет корректно выполнять заданные операции с введенными числами.