Запишите цикл вывода на экран элементов этого массива в строку через несколько пробелов.

Запишите цикл формирования этого массива (15 элементов) случайных чисел из отрезка [-7; 5].

программа: Pascal ABC.

Question

Лела

21 января, 16:37

+4

Ответы (2)

Знаешь ответ?

Галуша · Answer 1

Var m : array[1 ... 15] of Integer;

i : Byte;

Begin

For i:=1 to 15 do

Begin

m[i]:=-7+Random (13);

Write (m[i],' ');

end;

Writeln;

end.

Николка · Answer 2

Var A:array[1 ... 15] of Integer;

i:integer;

begin

For i:=1 to 15 do

A[i]:=Random (-7,5);

For i:=1 to 15 do

Write (A[i],' ');

end.