Составьте программу, которая формирует массив из 10 случайных чисел, принадлежащих промежутку [-9; 9], и выводит эти числа в столбец.

Question

Информатика

Любаня

20 мая, 14:34

Составьте программу, которая формирует массив из 10 случайных чисел, принадлежащих промежутку [-9; 9], и выводит эти числа в столбец.

+5

Ответы (2)

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

Павла · Answer 1

Const

n = 10;

var

x: array[1 ... n] of integer;

i: integer;

begin

Randomize;

Writeln ('Элементы массива:') ;

for i : = 1 to n do

begin

x[i] : = Random (19) - 9;

Writeln (x[i])

end

end.

Тестовое решение:

Элементы массива:

-9

0

-3

4

3

9

-7

9

6

-6

Слава · Answer 2

Program zz;

var a:array[1 ... 10] of integer;

i:integer;

begin

for i:=1 to 10 do

a[i]:=random (19) - 9;

for i:=1 to 10 do

writeln (a[i]) ;

end.