1. запишите число в развернутой форме.
15,789^10
2. переведите числа из двоичной системы
счисления в десятичную систему счисления.
100101^2
00^2
3. переведите числа из десятичной системы
счисления в двоичную систему счисления.
243^10=x^2
199^10=x^2
4. выполните операцию сложения двоичных чисел.
100011+10111​

print("Вопрос №1")

print("В коробке было 8 яиц, 2 вы розбили а 2 сели \nВаш ответ?")

question1 = int(input("..."))

if question1 != 6:

   print("В коробке было 6 яйца")

   print("Вслушайтесь в задачу внимательно, \n2 вы розбили '2 приготовили, 2 сели'")

   print('')

else:

   print("ответ правильний!")

   print('')

print("Вопрос №2")

print("Меня покупают для еды, \nно никогда не едят. Кто я?\nВаш ответ?")

question2 = input("...")

if question2 != "Тарелка" or question2 != "тарелка":

   print("Правильний ответ Тарелка")

   print('')

else:

   print("ответ правильний!")

   print('')

print("Вопрос №3")

print("В каком городе есть: 1/3 от Чили, \n1/3 от Канады и 1/3 от Гондураса\nВаш ответ?")

question3 = input("...")

if question3 != "Чикаго" or question3 != "чикаго":

   print("Правильний ответ Чикаго")

   print("(Чили - Чи, Канада - ка, Гондураса - го)")

   print('')

else:

   print("ответ правильний!")

//Видимо, это одна задача, так как "изменения" во второй не указаны
//Pascal ABC.NET v3.1 сборка 1172

Const
 n=20;

Var
 ar:array[1..n] of integer;
 i:integer;
begin
 randomize;
 writeln('First array:');
  for i:=1 to n do
   begin
    ar[i]:=random(10)-3;
    write(ar[i]:4);
    if ar[i]>0 then ar[i]:=ar[i]*2 else ar[i]:=0;
   end;
 writeln;
 writeln('Final array:');
  for i:=1 to n do
   write(ar[i]:4);
end.

Пример работы программы:
First array:   2  -3   5   6  -3  -3   1  -2  -3   1   3  -3   4  -3   1  -1   6   6   2   3
Final array:   4   0  10  12   0   0   2   0   0   2   6   0   8   0   2   0  12  12   4   6