Deni05
26.11.2021 14:41

Спо информатике,:

написать программу нахождения количества чисел кратных 3

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
noskova2012
01.04.2020 07:20
Жила была девочка. Она любила играть в игрушечного ослика. Но в ее день рождение ей подарили книгу, она была интересно .И когда девочка читала книгу, она часто забывала про своего друга детства. Ну вот девочке уже 13 лет. И родители решили подарить ей ноутбук, но когда девочка в него играла, она забывала обо всем на свете.
Вот пришло время генеральной уборки, мама девочки выставляет не нужные вещи на продажу. В свою очередь девочка уберает, чистит, моет свою комнату. Вот она все сделала и ей осталось собрать не нужные вещи. Она протянула руку на книжную полку и нашла свою самую первую книгу. Она улыбнулась и пустила слезу, при этом говоря :,, Все меняется''. Положив книгу в коробку, она заглянула в свой сундук с игрушками и увидела всего лишь одну игрушку. Да, это был тот самый ослик. Она обняла его, при этом сказав:,, все в жизни меняется, так же как и возвраст''. Девочка положила ослика в коробку и отнесла ее маме.Эту коробку купила одна девочка. Она была счастлива смотря на чудесные вещи.
0,0(0 оценок)
Ответ:
незнайка2901
25.09.2021 06:23
// PascalABC.NET 3.0, сборка 1139 от 10.01.2016
begin
  var n:=ReadInteger('n=');
  var b:=ArrRandomReal(n,-5,10);
  Writeln('Исходный массив'); b.Println(', ');
  Writeln('Сумма положительных элементов ',
    b.Where(x->x>0).Sum)
end.

Тестовое решение:
n= 10
Исходный массив
6.62419754156107, 6.74697848816727, 4.73433683148322, -0.587218480923781, -4.4331698163567, 0.961155824345143, -0.229649536884227, 7.50758543494511, 7.66080652720332, 9.97409514848799
Сумма положительных элементов 44.2091557961931
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота