Заполните целочисленный массив из 10 элементов и выведите на экран паскаль абс

AnnaDor AnnaDor    2   03.10.2019 12:20    0

Ответы
ОМЛА ОМЛА  09.10.2020 14:08

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

i:integer;

begin

for i:=1 to 10 do

begin

a[i]:=random(9)+1;

write(a[i],' ')

end

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика