Сделать массив из 20 чисел случайным образом числом из интервала от

Сделать массив из 20 чисел случайным образом числом из интервала от -10 дл 30 вывести элемент массива в строку через 4 позиции

вот что получилось

program e1; var A :array [1..20] of integer ; i:integer; begin for i :=1 to 20 do A[i]:= -10 +random(41); for i :=1 to 20 do write (A[i],'...'); end.

Задать свой вопрос
1 ответ
Var A :array [1..20] of integer ; i:integer;
begin
for i :=1 to 20 do
begin
a[i]:=random(-10,30);
write(a[i],'...');
end;
end.

, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт