А самому, не?
1. def func():
i, summ = 0,0
while i < 5:
i += 1
x = int(input())
if (x % 4 == 0) and (x % 10 == 6):
summ += x
print(summ)
func()
2.def speed():
n = int(input())
i = 0
maxSpeed = 0
text = 'NO'
while i < n:
i += 1
x = int(input())
if x < 30:
text = 'YES'
elif x > maxSpeed:
maxSpeed = x
print(maxSpeed, text)
speed()
<span>Слово integer обозначает целый тип (является идентификатором целого типа).
</span>for, while и <span>repeat
</span>15 = 1111<span>
</span>
Да. данная игра требует подписки.
Program ww;
Uses crt;
Var a,b,p:integer
Begin
Readln(a,b);
If a>b then p:=a*a*a;
else p:=b*b*b;
Writeln(p);
End.
Программа на PascalABC (На листинг программы сейчас попробую прислать ссылку)