PASCAL.как сделать чтобы было разность 1000-7 до отрицательного числа -1 и в конце надпись была я гуль - id1818049420210702 от Асель1139 02.07.2021 12:53

Question

Информатика: PASCAL.как сделать чтобы было разность 1000-7 до отрицательного числа -1 и в конце надпись была я гуль и еще было всё в CMD​

Асель1139 · Accepted Answer

1)
from random import random
N = 10
a = []
for i in range(N):
b = int(random() * 50)
a.append(b)
print(a)

min = 101
for i in range(N-1):
  s = a[i]+a[i+1]
  if (s < min) and (s % 2 == 1):
  min=s
print(min)

Пример:[41, 35, 16, 7, 29, 9, 16, 28, 10, 6]
23

2)
from random import random
N = 10
a = []
for i in range(N):
b = int(random() * 50)-25
a.append(b)
print(a)

k = 0
for i in range(N-1):
  p = a[i]*a[i+1]
  s = a[i]+a[i+1]
  if (p % 2 != 0) and (s > 0):
  k = k+1
print(k)

Пример:[11, 23, 12, -16, 21, 15, -11, -10, 10, 17]
3

PASCAL.как сделать чтобы было разность 1000-7 до отрицательного числа -1 и в конце надпись была я гуль и еще было всё в CMD​

MOGZ ответил

PASCAL.как сделать чтобы было разность 1000-7 до отрицательного числа -1 и в конце надпись была я гуль и еще было всё в CMD