в паскале Сформировать массив из положительных элементов и найти ...
в паскале Сформировать массив из положительных элементов и найти их произведение
Есть ответ
17.12.2022
393
Ответ
uses crt;var a:array[1..10] of integer;i,s:integer;beginwriteln('Исходный массив:');for i:=1 to 10 do begin a[i]:=random(10-1+1)+1; write(a[i]:4); end; s:=1;for i:=1 to 10 do begin s:=s*a[i]; end; writeln;writeln('Произведение элементов: ',s);end.
В массиве 10 элементов, которые заданы случайно в пределах от 1 до 10.
Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
Просто нажмите на кнопку "Подарить".
17.12.2022