Заполнить числовой массив, содержащий 10 элементов числами в диапазоне от 0 до 100 на Паскале

Question

Информатика

Арюша

31 января, 12:57

Заполнить числовой массив, содержащий 10 элементов числами в диапазоне от 0 до 100 на Паскале

+2

Ответы (1)

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

Вит · Answer 1

Const

n = 10;

var

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

i:integer;

begin

Randomize;

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

for i : = 1 to n do

begin

x[i] : = Random (101) ;

Write (x[i]:5)

end

end.

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

Элементы массива: 84 63 84 84 88 8 61 76 99 31