Ответ:
#Author: Ivanov I.I
k=0
print("Вопрос 1.")
print("Сколько будет 4х4?")
a=int(input())
if a==16:
print("Отлично! Правильный ответ!")
k=k+1
else:
print("Неверно")
print("Вопрос 2.")
print("Назовите столицу России")
b=input()
if b=="Москва":
print("Отлично! Правильный ответ!")
k=k+1
else:
print("Неверно")
print("Вопрос 3.")
print("Назовите имя Пушкина")
b=input()
if b=="Александр":
print("Отлично! Правильный ответ!")
k=k+1
else:
print("Неверно")
print("Вопрос 4")
print("Можно ли кушать снег? ")
print("1-да 0-нет")
b=int(input())
if b==0:
print("Отлично! Правильный ответ!")
k=k+1
else:
print("Неверно")
print("Вопрос 5.")
print("Сколько стоит 1 кг муки, если 0.5 кг муки стоит 36 руб")
b=int(input())
if b==72:
print("Отлично! Правильный ответ!")
k=k+1
else:
print("Неверно")
print("\nВсего вы набрали:",k,"баллов")
Если должен сказать твой персонаж, то там в действиях есть "Сказать", а если просто на экран там вроде-бы через рисунок можно
Program df;
uses crt;
var a,b,c,max,sum:integer;
begin
sum:=0;
max:=0;
writeln('введите числа а,b,c');
readln(a,b,c);
if (a>0)or(b>0)or(c>0) then sum:=a+b+c else if (a>b)and(a>c) then max:=a else if (b>c) then max:=b else max:=c;
if sum=0 then wrteln('Числа отрицательные большее из них ',max) else writeln('сумма чисел ',sum); end.
Var r,v:real;const p=3.14;beginwriteln('Введите радиус=');read(r);v:=4/3*p*(power(r,3));if (r=3) then writeln('Обьем окружности=',v:0:1)elsewriteln('Введите другой радиус');end.
Это пользователь... тыдым с: