Регистрация
laravivaldyoy2w4w
04.09.2022 07:34
Информатика
Есть ответ 👍

Найти сумму s=х*х+(5/х+2), х в пределах от 1 до 20 на языке паскаль

192
365
Посмотреть ответы 2

Ответы на вопрос:

Jeembo23
Jeembo23
4,5(93 оценок)
Program enot; var x: array [1..20] of integer; i: integer;   s,s1: real; begin for i: = 1 to 20 do begin x[i]: =i; s: =x[i]*x[i]+(5/x[i]+2); s1: =s1+s; end; write(s1); end.
theaziimut
theaziimut
4,6(72 оценок)

k = int(input('Крыльев: '))

n = int(input('Ножек: '))

b = int(input('Бедер: '))

for i in range(k + n + b):

   while n > 0:

       if n > 0 and k > 0:

           n -= 1

           k -= 1

       if n > 0 and b > 0:

           n -= 1

           b -= 1

   if b > 0:

       b -= 1

   if k >= 2:

       k -= 2

if n == 0 and b == 0 and k == 0:

   print('Да')

else:

   print('Нет')

Популярно: Информатика