Заполнить массив А по следующему принципу: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18...

Question

Заполнить массив А по следующему принципу: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 В программе Паскаль) Помогите пожалуйста

Comments

Вывод требуется массива на экран?

---

он одномерный или двумерный?

---

двумерный массив

---

да, требуется вывода на экран

Answer 1

const g = 4; v = 7;

var a: array[1..g,1..v] of integer;

i,j,x:integer;

begin

x:=1;

writeln('Массив: ');

for i:=1 to g do

begin

for j:=1 to v do

begin

a[i,j]:=x;

x:=x+1;

write(a[i,j]:3)

end;

writeln

end;

end.