1. <span>2) МАКСИМ
2. </span><span>4) КСЕНИЯ.
3. </span><span>1) ИРИНА
4. </span><span>1) Верблюд
5. </span><span>2) Кенгуру
6. </span><span>4) Страус
7. </span><span>1) ЖАРА
</span>
<span>n = int(input<span>())
</span>digs <span>= []
</span>while n > 0<span>:
</span> digs.append(n % 10<span>)
</span> n //= <span>10
</span>if digs[:len(digs) // 2] == digs[len(digs) // 2 + len(digs) % 2: ][::-1<span>]:
</span> print('YES'<span>)
</span>else<span>:
</span> print('NO'<span>)</span></span>
Var i:integer;
begin
for i:=1 to 10 do
writeln(,i,'*7=',i*7);
end.
Ответ:
52
Объяснение:
11 в двоичной это 1011
Переворачиваем - 1101
В конце могут быть отброшенные нули
100 в двоичной 1100100
Не больше ста максимальное число 110100
Это 32+16+4=52
Задание №1
program z1;
const n = 3;
m =3;
var a:array[1..n, 1..m] of integer;
i,j,min:integer;
begin
//Заполним матрицу и найдем минимальное
min:=20;
for i:=1 to n do begin
for j:=1 to m do begin
a[i,j]:=random(41)-20;
if a[i,j] < min then min:=a[i,j];
write(a[i,j]:4);
end;
writeln;
end;
writeln;
// меняем минимальное на 0 и выводим матрицу
for i:=1 to n do begin
for j:=1 to m do begin
if a[i,j] = min then a[i,j]:=0;
write(a[i,j]:4);
end;
writeln;
end;
end.
Тестовое решение для 1 задачи:
18 20 -10
19 -14 -17
-4 -17 -15
18 20 -10
19 -14 0
-4 0 -15
Задание №2
program z2;
const n = 3;
m =5;
var a:array[1..n, 1..m] of integer;
i,j,min:integer;
begin
//Заполним матрицу
for i:=1 to n do begin
for j:=1 to m do begin
a[i,j]:=random(41)-20;
write(a[i,j]:5);
end;
writeln;
end;
writeln;
// меняем все элементы на их квадраты и выводим матрицу
for i:=1 to n do begin
for j:=1 to m do begin
a[i,j]:=sqr(a[i,j]);
write(a[i,j]:5);
end;
writeln;
end;
end.
Тестовое решение для задания №2
15 8 18 -17 10
-19 17 1 20 -15
-20 -13 -11 -3 17
225 64 324 289 100
361 289 1 400 225
400 169 121 9 289