Есть ответ 👍

Дарю ток тем кто кинет аиди из пабга

124
212
Посмотреть ответы 3

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


Я не играю в пабг)

Объяснение:


ответ:прости,но без ответа незнаю чем

LFZ1
4,6(7 оценок)

ответ:

program n_1; //заголовок программы

const n=15; // блок описания используемых данных

var

i,p: integer;

a: array[1..n] of integer;

begin //программный блок

for i: =1 to n do

a[i]: =random(130)-50; //заполняем массив

for i: =1 to n do

p: =p*a[i]; //вычисляем произведение

writeln; //переходим на новую строчку

write(p); //выводим произведение

end. //завершаем программу

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