Составные компьютера или системный блок
import random as r
n=int(input())
array=[]
m=105
for i in range(n):
x=r.randint(-15,101)
array.append(x)
if x<m and x%2==0:
m=x
if m==105:
print('минимум: нет')
print(array,'\nминимум:',m)
var
a: integer;
begin
writeln('Введите число');
readln(a);
if (a mod 2 = 0) then
writeln('Число является четным') else
writeln('Число является нечетным');
end.
Program n_1;
uses math;
var i, n, m, a, kol, j:int64;
begin
readln(n);
kol:=0;
a:=n;
while a<>0 do begin
a:=a div 10;
kol:=kol+1;
end;
m:=n mod 100;
for i:=1 to kol-1 do begin
if((n div 10) mod 100 > m) then m:=(n div 10) mod 100;
n:=m div 10;
end;
writeln(m);
end.
Решение чисто математическое. Думаю через строковый тип данных работать будет намного проще.
Определять высоту звука по частоте волн