Блин что за муть как сложно,думаю как решить )
А самому, не?
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()
8)Г
9)Б
У тебя 9 правильно было написано, а в 8 думаю што Г
<u>PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var f:=ArrRandom(9,-50,50); f.Println;
var k:=f.Select(t->t*t).ToArray; k.Println
end.
<u>Пример</u>
39 0 28 31 -35 -2 -11 -48 -32
1521 0 784 961 1225 4 121 2304 1024
#include <iostream>
using namespace std;
int main() {
int n,i;
cout<<"Vvedite celoe chislo n " ;
cin>>n;
double a[n];
double b[n];
cout<<"Vvedite elementi a ";
for(i=0;i<n;i++) {
cout << "a[" << i+1 << "]= ";
cin>>a[i];
}
b[0]=a[0];
b[n-1]=a[n-1];
for(i=1; i<n-1; i++) b[i]=a[i]+a[i+1];
for (i=0;i<n;i++){
cout << " b[" << i+1 << "] = " << b[i];
}
return 0;
}