1) Что такое 3D- графика? Какие здесь есть измерения? 2) Какие программы для 2D- и 3D- графики вы знаете?
3) Что за программа SketchUp? Как ее запустить?
4) Какой шаблон нужно выбрать при запуске программы?

СОЧЧЧ

Question

Информатика: 1) Что такое 3D- графика? Какие здесь есть измерения? 2) Какие программы для 2D- и 3D- графики вы знаете? 3) Что за программа SketchUp? Как ее запустить? 4) Какой шаблон нужно выбрать при запуске программы? СОЧЧЧ ​

stefaniya2008 · Accepted Answer

{1}

const
n = 6;
var
a:array[1..n,1..n] of integer;
i,j:integer;
t:integer;

begin
for i := 1 to n do
for j := 1 to n do
read(a[i,j]);

for j := 1 to n div 2 do
for i := 1 to n do
begin
t := a[i,j];
a[i,j] := a[i,n+1-j];
a[i,n+1-j] := t;
end;

for i := 1 to n do
begin
writeln;
for j := 1 to n do
write(a[i,j],' ');
end
end.

{2}

const
n = 6;
var
a:array[1..n,1..n] of integer;
i,j:integer;
t:integer;

begin
for i := 1 to n do
for j := 1 to n do
read(a[i,j]);

for i := 1 to n do
for j := i+1 to n do
begin
t := a[i,j];
a[i,j] := a[j,i];
a[j,i] := t;
end;

for i := 1 to n do
begin
writeln;
for j := 1 to n do
write(a[i,j],' ');
end
end.

MOGZ ответил