А самому, не?
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()
Программисты которые создают вирусы более мотивированы чем те,которые создают антивирусы
var a:array[1..11]of integer;
i:integer;
begin
randomize;
for i:=1 to 11 do a[i]:=random(31)-20;
for i:=1 to 11 do write(a[i],' ');
writeln;
for i:=1 to 11 do if a[i] mod 2<>0 then a[i]:=a[i] div 3 else a[i]:=a[i]*5;
for i:=1 to 11 do write(a[i],' ');
end.
Паскаль не может все это делать сразу
радиус вводиться вручную
Правильный ответ под номером 4