Паскаль изучаю недавно, дали дз, но не понятно как сделать его. Учителя говорят думай, но я так ничего не смог придумать. Помогите, пожалуйста! Заранее спасибо.
Задача:
Решить поставленную задачу, используя средства управления вводом/выводом. Целочисленный массив размера n*m (n,m<=10) сформировать следующим образом: все элементы первого столбца равны 10, второго - 20, третьего - 30 и т. д. Вывести массив на экран так, чтобы каждая четная строка была смещена относительно нечетной на два элемента, поочередно то вправо, то влево:
* * * * *и т. д.
* * * * *
* * * * *
* * * * *
* * * * *
Вот все, что написал:
var
n,m,i,j:integer;
a:array[1..10,1..10] of integer;
begin
write('Enter matrics n*m: ');
readln(n,m);
if (n<=10) and (m<=10) then
begin
writeln;
for i:=1 to n do
begin
for j:=1 to m do
begin
a[i,j]:=j*10;
write(a[i,j]:4);
end;
writeln;
end;
end
else write('Nevernie znacheniya, n,m>10!');
readln;
end.