Написать программу таким образом, чтобы: 1) массив состоял из 35 элементов вещественноготипа: 2) значения элементов массива должны меняться винтервале от -12 до 115: 3) в результате выполнения программы элементымассива должны располагаться по убываниюнеположительных чётных чисел. p.s это все одна ​

while True:

   n = int(input('ввести конечное число n '))

   answ = ''

   if n<=10:

       print("число должно быть больше 10")

   else:

       for i in range(10,n):

           answ = ''

           for j in str(i):

               answ+=j

           for b in range(len(answ)):

               if b>0:

                   if answ[b]!=answ[b-1]:

                       break

                   if b==len(answ)-1 and answ[b]==answ[b-1]:

                       print(answ)

   

Всегда выполнять

Ввод числа

Переменная ответ для его вывода

Проверка числа(больше ли оно 10)

Если больше

от 10 до n раз

аннулируем ответ

записываем в него число

от 0 до длинны числа

если элемент не первый

проверяем его, совпадает ли он с предыдущим

если нет, заканчиваем проверять, ибо цифры уже не все одинаковые

если проверили последнее число и всё совпадает, выводим ответ

Задача А

program Boom;

uses crt;

var

 a, b: integer;

begin

 Read(a, b);

 if a > b then Writeln('Наибольшее число ', a) else Writeln('Наибольшее число ', b);

end.

Тестовое решение

12

52

Наибольшее число 52

Задача Б

program Boom;

uses crt;

 

var

     a:array[1..4] of Integer;

     max:integer;

     i:byte;

Begin

for i:= 1 to 4 do

Begin

Write('Введите число:');

Read(a[i]);

End;

max := a[1];

for i:= 2 to 4 do

if a[i] > max then

max := a[i];

Write('Наибольшее число:');

WriteLn(max);

End.

Тестовое решение:

Введите число:12

Введите число:53

Введите число:34

Введите число:63

Наибольшее число:63