Қабырғалармен қоршалған жазық объект қалай аталады?

1)

var

a: array [1..5,1..10] of integer;

i,j,p: integer;

begin

for i: =1 to 5 do 

begin

for j: =1 to 10 do

begin

a[i,j]: =random(50)+1;

write(a[i,j]: 3);

end;

writeln;

end;

writeln('меняем 1 и последнюю строки');

for j: =1 to 10 do

begin

p: =a[1,j];

a[1,j]: =a[5,j];

a[5,j]: =p;

end;

for i: =1 to 5 do 

begin

for j: =1 to 10 do

write(a[i,j]: 3);

writeln;

end;

end.

2)

var a: array [1..5, 1..10] of integer; i, j: integer; p: real;

begin for i : = 1 to 5 do begin for j : = 1 to 10 do begin a[i, j] : = random(50) + 1; write(a[i, j]: 3); end; writeln; end; writeln('произведения элементов строк'); for i : = 1 to 5 do begin p : = 1; for j : = 1 to 10 do p : = p * a[i, j]; writeln(p: 25: 0); end; end.

количество базовых цветов обозначим за n. из всех базовых цветов будет складываться какой то один цвет, соответственно количество всевозможных цветов можно вычислить по формуле n=2^(2*n)

program w7w7;

var a: real;

begin

readln (a);

if a< 0 then writeln ('otritsatelnoe chislo');

if a> 0 then  writeln ('pologitelnoe chislo');

end.

program z2_65; uses crt; label a1,a2,a3,a4,a5,a6,a7; var a,s,h,rv,ro,p: real; n: integer; beginclrscr; writeln('укажите номер пункта: '); writeln('1. дана сторона треугольника.'); writeln('2. дана площадь треугольника.'); writeln('3. дана высота треугольника.'); writeln('4. дан радиус вписанной окружности треугольника.'); writeln('5. дан радиус описанной окружности треугольника.'); read(n); case n of1: begin write('a='); read(a); goto a1; end; 2: begin write('s='); read(s); goto a2; end; 3: begin write('h='); read(h); goto a3; end; 4: begin write('r='); read(rv); goto a4; end; 5: begin write('r='); read(ro); goto a5; end; elsebeginwrite('такого номера пункта нет.'); goto a7; end; end; a1: rv: =a/2; ro: =a/sqrt(3); s: =sqrt(3)*sqr(a)/4; h: =2*s/a; goto a6; a2: a: =sqrt(4*s/sqrt(3)); h: =2*s/a; rv: =a/2; ro: =a/sqrt(3); goto a6; a3: a: =2*h/sqrt(3); s: =a*h/2; rv: =a/2; ro: =a/sqrt(3); goto a6; a4: a: =2*rv; ro: =a/sqrt(3); s: =sqrt(3)*sqr(a)/4; h: =2*s/a; goto a6; a5: a: =sqrt(3)*ro; s: =(a*a*a)/(4*ro); h: =2*s/a; rv: =a/2; a6: writeln('a=',a: 2: 2); writeln('s=',s: 2: 2); writeln('h=',h: 2: 2); writeln('r=',ro: 2: 2); writeln('r=',rv: 2: 2); a7: readkey; end.