Нужно блок-схема на program Pr45; var
a, b, c, d : real;
max : real;
begin
readln(a, b, c, d);
if (a max) then max := b;
if (c > max) then max := c;
if (d > max) then max := d;
a := max;
b := max;
c := max;
d := max;
end
else if not ((a > b) and (b > c) and (c > d)) then
begin
a := sqr(a);
b := sqr(b);
c := sqr(c);
d := sqr(d);
end;
writeln(a : 5 : 2);
writeln(b : 5 : 2);
writeln(c : 5 : 2);
writeln(d : 5 : 2);
readln;
end.

bank_ques = {}

#Создание вопросов:

# bank_ques["сам вопрос"'] = "ответ на него", вопрос и ответ в виде строки, даже если это число

bank_ques["2*2"] = "4"

bank_ques["3*3"] = "9"

bank_ques["4*4"] = "16"

bank_ques["5*5"] = "25"

bank_ques["6*6"] = "36"

#Вопросов может быть неограниченное количество

# Также генерировать вопросы можно как в самом коде, так и сделать в цикле, но тут уже как хотите

for question in bank_ques:

   print(question)

   answer = input("ответ: ")

   if answer == bank_ques[question]:

       print("правильно")

   else:

       print("ответ неверный")

bank_ques = {}

#Создание вопросов:

# bank_ques["сам вопрос"'] = "ответ на него", вопрос и ответ в виде строки, даже если это число

bank_ques["2*2"] = "4"

bank_ques["3*3"] = "9"

bank_ques["4*4"] = "16"

bank_ques["5*5"] = "25"

bank_ques["6*6"] = "36"

#Вопросов может быть неограниченное количество

# Также генерировать вопросы можно как в самом коде, так и сделать в цикле, но тут уже как хотите

for question in bank_ques:

   print(question)

   answer = input("ответ: ")

   if answer == bank_ques[question]:

       print("правильно")

   else:

       print("ответ неверный")