
for i:=0 to b do
begin
for j:=0 to c do
write(a[i,j],' ');
writeln;
end;
for i:=0 to b - 1 do
begin
for j:=0 to c - 1 do
for i:=1 to b do
begin
for j:=1 to c do
М | 2. Все тексты программ должны помещаться в теги [ code=pas ] ... [ / code ]. !!! |