
Opidar
5 год назад
Сформируйте массив,содержащий 18 случайных вещественных чисел, принадлежащих промежутку (квадратная скобка)|-3;2) и подсчитывает сумму положительных чисел.Выводит в столбик с двойными десятичными значениями.
ОТВЕТЫ

Paraskeva
Oct 24, 2020
var a:real;
i:byte;
begin
randomize;
for i:=1 to 18 do begin
a:=random()*random(-3,2);
writeln(a:2:2)
end;
end.
i:byte;
begin
randomize;
for i:=1 to 18 do begin
a:=random()*random(-3,2);
writeln(a:2:2)
end;
end.
216
Смежные вопросы: