Регистрация
Войти
Стать экспертом Правила
Информатика

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

ОТВЕТЫ
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.
216
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам