Регистрация
Войти
Стать экспертом Правила
Информатика

Заполните массив случайными целыми числами из отрезка [0,10]

ОТВЕТЫ
Const  n = 10;
var  x: array[1..n] of integer; 
i: integer;
begin 
Randomize; 
for i := 1 to n do 
begin   
x[i] := Random(11);   
Write(x[i]:4) 
end;
end.
116
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам