Ответы на вопрос:
{заполняем, например, массив в диапазоне [-50.99]} const n=10; var a: array[1..n]of integer; i: integer; s,p: real; begin randomize; p: =1; for i: =1 to n do begin a[i]: =random(100)-50; write(a[i]: 4); p: =p*a[i] ; s: =s+a[i]; end; writeln; writeln('p = ',p, ' s= ',s); end.
Популярно: Информатика
-
revernastyn03.08.2022 11:23
-
ОляХ102.05.2023 03:37
-
Dayana200504130.11.2021 07:15
-
matwej220129.04.2020 08:00
-
Ahdrey060717.01.2020 01:13
-
galitskovao08.02.2023 12:58
-
CheryLi03.06.2023 22:25
-
AnnYtAa103.04.2020 00:18
-
IAmCookie13.10.2022 03:59
-
Ольгаok01.03.2023 04:52