Во Программа, редактирующая графические изображения, предназначена: Варианты ответов для создания графического образа текста для редактирования вида и начертания шрифта для работы с графическим изображением для построения диаграмм Во Выберите из списка все названия растровых графических редакторов Варианты ответов Adobe Photoshop Paint Corel Draw Inkscape Gimp Во Выберите команду, которая не относится к работе в графическом редакторе Paint Варианты ответов Заливка цветом Группировать Выделить Изменение цветов Во Выберите из списка действие которое необходимо перед выполнением любой операции над фрагментом изображения в графическом редакторе. Варианты ответов Разъединить Выделить Перекрасить Сохранить Во Введите в ответ пропущенное слово. В графическом редакторе текст перестает существовать как самостоятельный элемент после окончания набора и становится группой пикселей на рисунке. Во К средствам мультимедиа относится Варианты ответов звук, текст, графика, изображения звук, колонки, графика видео, анимация, текст, звук, графика анимация, текст, видео, мультимедийные программы Во Какой компьютер будет считаться мультимедийным? Варианты ответов при наличии DVD привода при наличии проектора при наличии колонок при наличии всего перечисленного Во Презентация - это Варианты ответов предоставление подарка подготовленного заранее показ, представление чего-либо нового, выполняемые докладчиком с использованием всех возможных технических и программных средств демонстрация своих знаний перед людьми, которые задают вам во Во Как называется одна страница презентации Варианты ответов Слайд Страница Каталог Макет Во Программа для создания презентации Варианты ответов Word Paint Power Point Excel Во Искусственное представление движения в кино, на телевидении или в компьютерной графике путем отображения последовательности рисунков или кадров с частотой, при которой обеспечивается целостное зрительное восприятие образов, называется Варианты ответов презентация слайд-шоу анимация цифра Во Как с английского переводится слово media? Варианты ответов среда много движение передача информации
Ответы
Var
i, j, k : integer;
a : array [0..9,0..9] of char;
procedure U(i,j:integer);
var c : char;
begin
c:=a[i,j]; a[i,j]:=' ';
if (c='W')and(a[i+1,j]='B') then U(i+1,j);
if (c='B')and(a[i+1,j]='W') then U(i+1,j);
if (c='W')and(a[i-1,j]='B') then U(i-1,j);
if (c='B')and(a[i-1,j]='W') then U(i-1,j);
if (c='W')and(a[i,j+1]='B') then U(i,j+1);
if (c='B')and(a[i,j+1]='W') then U(i,j+1);
if (c='W')and(a[i,j-1]='B') then U(i,j-1);
if (c='B')and(a[i,j-1]='W') then U(i,j-1);
end;
begin
assign(input,'input.txt');
reset(input);
assign(output,'output.txt');
rewrite(output);
for i:=1 to 8 do begin for j:=1 to 8 do
read(a[i,j]);
readln
end;
for i:=1 to 8 do
begin
a[0,i]:=' '; a[9,i]:=' '; a[i,0]:=' '; a[i,9]:=' '
end;
k:=0;
for i:=1 to 8 do
for j:=1 to 8 do
if a[i,j]<>' ' then
begin
k:=k+1; U(i,j)
end;
write(k);
close(output)
end.
i, j, k : integer;
a : array [0..9,0..9] of char;
procedure U(i,j:integer);
var c : char;
begin
c:=a[i,j]; a[i,j]:=' ';
if (c='W')and(a[i+1,j]='B') then U(i+1,j);
if (c='B')and(a[i+1,j]='W') then U(i+1,j);
if (c='W')and(a[i-1,j]='B') then U(i-1,j);
if (c='B')and(a[i-1,j]='W') then U(i-1,j);
if (c='W')and(a[i,j+1]='B') then U(i,j+1);
if (c='B')and(a[i,j+1]='W') then U(i,j+1);
if (c='W')and(a[i,j-1]='B') then U(i,j-1);
if (c='B')and(a[i,j-1]='W') then U(i,j-1);
end;
begin
assign(input,'input.txt');
reset(input);
assign(output,'output.txt');
rewrite(output);
for i:=1 to 8 do begin for j:=1 to 8 do
read(a[i,j]);
readln
end;
for i:=1 to 8 do
begin
a[0,i]:=' '; a[9,i]:=' '; a[i,0]:=' '; a[i,9]:=' '
end;
k:=0;
for i:=1 to 8 do
for j:=1 to 8 do
if a[i,j]<>' ' then
begin
k:=k+1; U(i,j)
end;
write(k);
close(output)
end.
Var
i, j, k : integer;
a : array [0..9,0..9] of char;
procedure U(i,j:integer);
var c : char;
begin
c:=a[i,j]; a[i,j]:=' ';
if (c='W')and(a[i+1,j]='B') then U(i+1,j);
if (c='B')and(a[i+1,j]='W') then U(i+1,j);
if (c='W')and(a[i-1,j]='B') then U(i-1,j);
if (c='B')and(a[i-1,j]='W') then U(i-1,j);
if (c='W')and(a[i,j+1]='B') then U(i,j+1);
if (c='B')and(a[i,j+1]='W') then U(i,j+1);
if (c='W')and(a[i,j-1]='B') then U(i,j-1);
if (c='B')and(a[i,j-1]='W') then U(i,j-1);
end;
begin
assign(input,'input.txt');
reset(input);
assign(output,'output.txt');
rewrite(output);
for i:=1 to 8 do begin for j:=1 to 8 do
read(a[i,j]);
readln
end;
for i:=1 to 8 do
begin
a[0,i]:=' '; a[9,i]:=' '; a[i,0]:=' '; a[i,9]:=' '
end;
k:=0;
for i:=1 to 8 do
for j:=1 to 8 do
if a[i,j]<>' ' then
begin
k:=k+1; U(i,j)
end;
write(k);
close(output)
end.
i, j, k : integer;
a : array [0..9,0..9] of char;
procedure U(i,j:integer);
var c : char;
begin
c:=a[i,j]; a[i,j]:=' ';
if (c='W')and(a[i+1,j]='B') then U(i+1,j);
if (c='B')and(a[i+1,j]='W') then U(i+1,j);
if (c='W')and(a[i-1,j]='B') then U(i-1,j);
if (c='B')and(a[i-1,j]='W') then U(i-1,j);
if (c='W')and(a[i,j+1]='B') then U(i,j+1);
if (c='B')and(a[i,j+1]='W') then U(i,j+1);
if (c='W')and(a[i,j-1]='B') then U(i,j-1);
if (c='B')and(a[i,j-1]='W') then U(i,j-1);
end;
begin
assign(input,'input.txt');
reset(input);
assign(output,'output.txt');
rewrite(output);
for i:=1 to 8 do begin for j:=1 to 8 do
read(a[i,j]);
readln
end;
for i:=1 to 8 do
begin
a[0,i]:=' '; a[9,i]:=' '; a[i,0]:=' '; a[i,9]:=' '
end;
k:=0;
for i:=1 to 8 do
for j:=1 to 8 do
if a[i,j]<>' ' then
begin
k:=k+1; U(i,j)
end;
write(k);
close(output)
end.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Эргономиканын максаты кандай??
Автор: StudioArtNails
Расписать решения, поменяйте,
Автор: ogofman
Запишите в развернутой форме числа: а) 23, 15046; б) 100, 112
Автор: озерская_Мария1234
Рассмотрите электронную таблицу Определите действия которые были использованы для её заполнения и форматирования
Автор: Klicheva_Ermachenkova1536
X(с палочкой вверху)+ z-> (x+y(тож с
Автор: Pautova1119
1 - 3
2 Paint Gimp
3 Группировать
4 не знаю скорее всего РАЗЬЕДИНИТЬ
5 ???
6 видео, анимация, текст, звук, графика
7 при всем перечисленном
8 показ, представление чего-либо нового, выполняемые докладчиком с использованием всех возможных технических и программных средств
9 Слайд
10 PowerPoint
11 анимация
12 передача информации (скорее всего)
Объяснение: