Заполнить массив 15-ю целыми случайными числами из спектра [-30;70].Паскаль либо Кумир

Заполнить массив 15-ю целыми случайными числами из спектра [-30;70].
Паскаль или Кумир

Задать свой вопрос
2 ответа
PascalABC.NET 3.3.5, сборка 1650 от 01.04.2018
Внимание! Если программка не работает, обновите версию!

begin
  var a:=ArrRandom(15,-30,70); a.Println
end.

Пример
-26 55 10 -13 9 -21 22 -1 16 23 42 -4 58 -11 59
Var
  A: array [1..15] of integer;
  i: integer;
begin
  for i := 1 to 15 do
  begin
    A[i] := random(101)-30;
    write(A[i]:4);
  end;
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт