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

EmilN304 EmilN304    1   15.09.2019 16:40    4

Ответы
rekiol544 rekiol544  07.10.2020 17:45
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика