Ответ:
import sys
m = int(input("Задайте m : "))
n = int(input("Задайте n : "))
if(m < n):
m = m*n
n = m*m + n*n
elif(n < m):
n = m*n
m = m*m + n*n
else:
print("Числа равны")
sys.exit()
print("n = ",n)
print("m = ",m)
Объяснение:
Про табуляцию не забудь. Язык Python 3x
Мультфильм про самых лучших мам или учительниц:*
<span>program matrica;
Var
i,j,n:integer;
a:array[1..50,1..50] of integer;
Begin
Writeln('Введите размерность матрицы:');
Readln(n);
for i:=1 to n do
begin
Writeln('Ввод ',i,' строки');
for j:=1 to n do
begin
Write('A[',i,',',j,']=');
Readln(A[i,j]);
end;
end;
writeln;
writeln('Исходная матрица:');
for i:=1 to n do
begin
for j:=1 to n do
write(A[i,j],' ');
writeln;
end;
for i:=1 to n do
for j:=i to n do
if a[i,j]=a[j,i] then
Writeln(a[i,j],' i=',i,' j=',j);
End.</span>
Var a:array [1..10] of integer;
i,p:integer;
begin
for i:=1 to 10 do begin
a[i]:=random(10);
if (a[i] mod 3 = 0) and (p=0) then p:=i; end;
writeln(a);
for i:=p to 9 do
a[i]:=a[i+1];
a[10]:=0;
writeln(a);
end.
Const
n=10;
var
i,j,k,m,buf:integer;
a:array[1..n,1..n]of integer;
begin
for i:=1 to n do
begin
writeln;
for m:=1 to n do
begin
a[i,m]:=random(20);
write(a[i,m]:4);
end;
end;
writeln;
writeln('k,j ?');
readln(k,j);
for m:=1 to n do
begin
buf:=a[k,m];
a[k,m]:=a[j,m];
a[j,m]:=buf;
end;
for i:=1 to n do
begin
writeln;
for m:=1 to n do
write(a[i,m]:4);
end;
end.