Предмет: Информатика, автор: karinakiss0606

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

Ответы

Автор ответа: NewaSeven
0
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.
Интересные вопросы
Предмет: Другие предметы, автор: vnastya992
Предмет: Математика, автор: alinkakupova