В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
vikaplmplmpl
vikaplmplmpl
09.03.2023 20:41 •  Информатика

Перевести код из паскаля на Python
var y,i:integer;
x,j:char;
a:array[1..8,'a'..'h'] of char;
begin
readln(x);
readln(y);
for i:=1 to 8 do
for j:='a' to 'h' do
if abs(i-y)*abs(ord(j)-ord(x))=2 then a[i,j]:='*'
else a[i,j]:='.';
a[y,x]:='K';
for i:=8 downto 1 do
begin
for j:='a' to 'h' do
write(a[i,j]:2);
writeln;
end;
end.
Очень

Показать ответ
Ответ:
latiff
latiff
10.06.2021 07:04
Деревья строятся просто: добавляем узел – операцию, которая выполняется последней, и к ней два потомка – аргументы этой операции. Например, для выражения a + b операцией будет "+", а аргументами – a и b. Затем в таком же виде представляем аргументы этой операции, пока все аргументы не будут содержать выражений. Построенные деревья во вложении.

Префиксная форма записи заключается в том, что сначала записывается операция, потом префиксная запись её первого аргумента, потом второго аргумента. Это соответствует обходу дерева сверху вниз и слева направо, записываем, что сверху, потом идем вниз. Вот что получится в итоге:
а) * + a b + c * 2 d
б) + * - * 2 a * 3 d c * 2 b
в) - * 3 a * + * 2 b c d

В постфиксной записи, наоборот, записываются сначала аргументы, потом операция. Это соответствует обходу дерева снизу-вверх.
а) a b + c 2 d * + *
б) 2 a * 3 d * - c * 2 b * +
в) 3 a * 2 b * c + d * -
Постройте дерево, соответствующее арифметическому выражению. запишите это выражения в префиксной и п
Постройте дерево, соответствующее арифметическому выражению. запишите это выражения в префиксной и п
Постройте дерево, соответствующее арифметическому выражению. запишите это выражения в префиксной и п
0,0(0 оценок)
Ответ:
danikstremers1
danikstremers1
09.08.2020 07:53

Var a:array [0..2,0..2] of integer;

Position:array[0..1,0..1] of byte;

i,j,max,min:integer;

Procedure print(a:array of array of integer);

Begin

For i:integer:=low(a) to high(a) do begin

For j:integer:=low(a[i]) to high (a[i]) do

Write(a[i,j],' ');

Writeln;

End;

End;

Begin

Max:=integer.minvalue;

min:=integer.maxvalue;

for i:=low(a) to high(a) do

For j:=low(a[i]) to high(a[i]) do

A[i,j]:=random(10);

Print(a);

for i:=low(a) to high(a) do

For j:=low(a[i]) to high(a[i]) do

Begin

If (a[i,j]<min) then begin

Min:=a[i,j]; position [0,0]:=i; position [0,1]:=j;

End;

If (a[i,j]>max) then begin

Max:=a[i,j]; position [1,0]:=i; position [1,1]:=j;

End;

End;

Swap(a[position[0,0], position [0,1]],a[position [1,0]],a[position [1,1]]);

Print(a);

End.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота