Составьте программу, которая фотрмирует массив из 15 случайных целых…

Question

Составьте программу, которая фотрмирует массив из 15 случайных целых чисел от -10 до 10. Найти произведение всех элементов массива, модуль которыхменьше 3. На экран выводятся исходные значения и результаты вычеслений.

Answer 1

69

grz26

24 марта 2023

Uses crt; const n=15; var a: array[1… n] of integer; pr,i: integer; beginrandomize; for i: =1 to n dobegina[i]: =random (20) -10; write (a[i],'); end; writeln; pr: =1; for i: =1 to n doif abs (a[i]) <3 then pr: =pr*a[i]; writeln (pr); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: