Задать вопрос
28 июня, 16:57

Информатика 8 класс, программирование

Если произведение трёх чисел равно нулю, нулевые элементы заменить суммой этих трёх чисел

+3
Ответы (1)
  1. 28 июня, 20:17
    0
    begin

    var a:=ReadArrInteger ('Введите 3 чисел:',3) ;

    var i:=a. Aggregate (1, (i, j) - >i*j) ;

    var s:=a. Aggregate (0, (i, j) - >i+j) ;

    if i=0 then a. Replace (0, s) ;

    a. Println;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Информатика 8 класс, программирование Если произведение трёх чисел равно нулю, нулевые элементы заменить суммой этих трёх чисел ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
В целочисленной последовательности есть нулевые элементы. Создать массив из номеров этих элементов. То-есть дан массив в которым есть нулевые значения. Например: 20330120 От Вас требуется создать массив из номеров этих нулевых значений.
Ответы (1)
Программирование Тема: процедуры Дан массив, содержащий нулевые элементы. Создать массив из номеров этих элементов.
Ответы (1)
В массиве заменить все нулевые элементы суммой всех элементов (паскаль)
Ответы (1)
Программирование циклических алгоритмов. Программирование циклов с заданнымусловием продолжения работы. Задача: Клиент открыл счет в банке в 2017 году, вложив 1000 рублей.
Ответы (1)
Задача на Паскале (нужно полное решение) Задан массив случайным образом. Преобразовать его след. образом: все отрицательные элементы заменить модулем, положительные удвоить, нулевые заменить числом 10
Ответы (1)