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

Question

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

Answer 1

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.

Comments

а должно быть 1 число ?

---

Что значит 1 число? Это цикл. Выполеяется 10 раз.

---

да но мы не проходили цикл ,палево что я списывал

---

Массивы проходили, а циклы нет?

---

да