составьте программу которая формирует массив из 10 целых чисел из промежутка [-7...

October 2021 1 12 Report

составьте программу которая формирует массив из 10 целых чисел из промежутка [-7 7] и выводит на экран сформированный массив и произведение отрицательных элементов массива

Answers & Comments

degtyarev327 Var i,pr:integer;
a:array[1..10]of integer;
begin
pr:=1;
for i:=1 to 10 do begin
a[i]:=7-random(14)+1;
if a[i]<0 then pr:=pr*a[i];
writeln(a[i]);
end;
writeln('Proizvedenie:',pr);
end.

2 votes Thanks 1

Beleklera75 спасибоооо

degtyarev327 Поставь потом лучший ответ пожалуйста

sostavte programmu kotoraya formiruet massiv iz 10 sluchajnyh chisel iz promezhutka

Answer

Beleklera75 August 2022 | 0 Ответы

sostavte programmu kotoraya formiruet massiv iz 10 celyh chisel iz promezhutka 70a28f9eeea275fb8536ba62fd046229b 77094

Answer

Answers & Comments

sostavte programmu kotoraya formiruet massiv iz 10 sluchajnyh chisel iz promezhutka

sostavte programmu kotoraya formiruet massiv iz 10 celyh chisel iz promezhutka 70a28f9eeea275fb8536ba62fd046229b 77094

рекомендуемые вопросы

Helpful Links

Helpful Social