Регистрация
daallantin
26.06.2021 00:12
Информатика
Есть ответ 👍

Написать программу на языке программирования паскаль в результате выполнения которой получались произведение не нулевых элементов массива .

225
248
Посмотреть ответы 2

Ответы на вопрос:

GenGis
GenGis
4,6(23 оценок)

program helloworld;

var n: array [1..10] of integer;

var c: integer;

var i: smallint;

  begin

c: =1;

  for i: =1 to 10 do            n[i] : = random(10); //заполняем случайными данными

for i: =1 to 10 do    if n[i] > 0 then c: =c*n[i];

end.

катя10467743
катя10467743
4,8(22 оценок)
Различные стили (первое) например шрифт различный, высоту букв, и т.д.

Популярно: Информатика