М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
tatyanapaderina
tatyanapaderina
19.03.2021 07:26 •  Информатика

Якби щороку протягом наступних 15 років ви додавали по одному кілограму ваги, яким би виявилася ваша місячний вага в кожен з щорічних візитів на місяць аж до 15-го року? напишіть програму, яка за циклу for друкує на екрані вашу місячну вагу в кожному році.

👇
Открыть все ответы
Ответ:
daниил1
daниил1
19.03.2021
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

№1

begin
  var a:=ArrRandom(ReadInteger('n='),-50,50); a.Println;
  Writeln('Количество отрицательных значений ',a.Where(t->t<0).Count);
end.

Пример
n= 15
3 39 3 2 43 43 -37 -2 -50 3 -25 15 -7 4 21
Количество отрицательных значений 5

№2

begin
  var (m,n):=ReadInteger2('Количество строк и столбцов в массиве:');
  Writeln('*** Исходный массив ***');
  var a:=MatrRandom(m,n,-99,99);
  a.Println(4); Writeln(4*a.ColCount*'-');
  var k:=ReadInteger('k=');
  if a.ElementsByRow.Any(t->t>k) then Writeln('Есть')
  else Writeln('Нет')
end.

Пример
Количество строк и столбцов в массиве: 5 8
*** Исходный массив ***
  -9  48 -98 -35 -33 -29  44 -32
 -33 -48 -62  11  45  53  52  90
 -96  -1  68 -21  15 -72 -78 -28
  44  15 -53 -33 -27  89 -60 -49
  28 -73 -99  81  23  -9 -93 -66

k= 92
Нет
4,6(15 оценок)
Ответ:
Artur1Khasanov
Artur1Khasanov
19.03.2021

import random

N = [random.randint(0, 100) for i in range(10)]

print ("Array is:", N)

sum_less_50 = 0

Count_less_50 = 0

sum_more_50 = 0

Count_more_50 = 0

for elem in N:

   if elem >= 50:

       Count_more_50 += 1

       sum_more_50 += elem

   else:

       Count_less_50 += 1

       sum_less_50 += elem

print("Awerage of nums, that < 50: ", end = "")

if Count_less_50 > 0:

   print(sum_less_50 / Count_less_50)

else:

   print(0)

print("Awerage of nums, that >= 50: ", end= "")

if Count_more_50 > 0:

   print(sum_more_50 / Count_more_50)

else:

   print(0)

4,5(34 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ