if max>max2 then
max2:=a
else
max:=a;
end;
writeln(max:4:2,' ',max2:4:2);
end.
или через массивВ массив заносим 2 элемента. В цикле вводим остальные элементы. В массиве находим минимальный и, если введенный следующий элемент (b) больше минимального массива, то записываем b в массив на место наименьшего.
В результате в массиве два максимальных эл-та
var
a:array[1..2]of integer;
n,i,min,j,m,b:integer;
begin
readln(n);
readln(a[1],a[2]);
for i:=3 to n do
begin
readln(b);min:=a[1];m:=1;
for j:=1 to 2 do
if a[j]<min then
begin
min:=a[j];
m:=j;
end;
if b>min then
a[m]:=b;
end;
for i:=1 to 2 do
writeln(a[i]);
end.
list = []
while True:
n = int(input("nb: "))
if n == 0:
break
list.append(n)
res = 1
sum = sum(list)
for x in list:
if x * x > sum:
res *= x
print(res)
# 2def isPerfectSquare(num):
s = int(num**0.5)
return s * s == num
def isFibonacciNumber(n):
return isPerfectSquare(5 * n * n + 4) or isPerfectSquare(5 * n * n - 4)
list = []
while True:
n = int(input('nb : '))
if n % 2:
odd = n
break
list.append(n)
if isFibonacciNumber(n):
print([x for x in list if not(x % 3)])
else:
print([x for x in list if not(x % 5)])
# 3list = []
N = int(input('N = '))
for i in range(N):
n = int(input('nb : '))
list.append(n)
print(sum([x for x in list if x * x % 10 == 9]))