Var f: text; i, x: integer; определите содержимое файла f после выполнения следующих операторов: rewrite(f); for i: =3 downto 1 do begin x: =2*i; write(f, x) end; close(f);

В файл будут записываться числа 6, 4 и 2, но так как никаких разделителей между числами нет, то получится 642

while True:

   n = int(input('Введите кол-во чисел: '))

   if n <= 1000:

       break

   else:

       print('Ошибка: Кол-во чисел не должно превышать 1000')

number = None

for _ in range(n):

   while True:

       num = int(input('Введите число: '))

       if num <= 30000:

           break

       else:

           print('Ошибка: Число не должно превышать 30000')

   if num % 5 == 0:

       if number:

           if num > number:

               number = num

       else:

           number = num

print(number)

while True:

   n = int(input('Введите кол-во чисел: '))

   if n <= 1000:

       break

   else:

       print('Ошибка: Кол-во чисел не должно превышать 1000')

number = None

for _ in range(n):

   while True:

       num = int(input('Введите число: '))

       if num <= 30000:

           break

       else:

           print('Ошибка: Число не должно превышать 30000')

   if num % 5 == 0:

       if number:

           if num > number:

               number = num

       else:

           number = num

print(number)