68

ПОМОГИТЕ ПОЖАЛУЙСТА, ДАЮ 30 БАЛЛОВ! Составьте программу, которая формирует массив,…

16 августа 2022

ПОМОГИТЕ ПОЖАЛУЙСТА, ДАЮ 30 БАЛЛОВ! Составьте программу, которая формирует массив, содержащий 12 случайных вещественных чисел, принадлежащих промежутку от [-10; 30], и подсчитывает произведение всех отрицательных чисел. Вывод в столбец с тремя десятичными знаками.

категория: информатика

45

vara: array[1… 12] of real; i: integer; pr: real; beginrandomize; pr: =1; for i: =1 to 12 do begin a[i]: =random (41)*0,9-10; if (a[i] < 0) then pr: =pr*a[i]; end; writeln (pr: 5:3) end.

Знаете ответ?

Смотрите также:
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...