В объяснении
Объяснение:
program zadacha;
const n= 6; m=6;
var a:array[1..n, 1..m] of integer;
i, j, s, k: integer;
begin
RANDOMIZE;
for i:=1 to n do
begin
for j:=1 to m do
begin
a[i,j]:= random (100)-50;
write(a[i,j]:5);
end;
writeln;
end;
s:=0;
k:=0;
for i:=1 to n do
for j:=1 to m do
if i>j then
begin
k:=k+1;
s:=s+a[i,j];
end;
writeln('Сумма=',s);
writeln('Количество=',k);
readln;
end.
2. Слои в Photoshop напоминают стопку прозрачных листов. Через прозрачные области вышележащих слоев можно видеть содержимое нижних слоев. Можно перемещать слой для изменения положения изображения подобно перемещению прозрачного листа в стопке. Также можно изменять уровень непрозрачности слоя, чтобы сделать содержимое частично прозрачным.
Слои применяются для выполнения таких задач, как совмещение нескольких изображений, добавление текста или векторных фигур на изображение. Можно применить стиль слоя для добавления специальных эффектов, таких как отбрасывание тени или свечение.
Объяснение:
var
A: array [1..9, 1..9] of Integer;
i, j: Integer;
begin
WriteLn ('Массив:');
for i := 1 to 9 do begin
for j := 1 to 9 do begin
if Abs (i - 5) + Abs (j - 5) <= 3 then
A [i, j] := 1
else
A [i, j] := 0;
end;
end;
for i := 1 to 9 do begin
for j := 1 to 9 do begin
Write (A [i, j], ' ');
end;
WriteLn;
end;
end.