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

Cклавиатуры вводятся произвольные числа. необходимо вычислить среднее арифметическое всех введенных четных чисел. условием выхода из цикла является сумма чисел больше 150. написать программу на языке паскаль.

👇
Ответ:
Granger341
Granger341
06.09.2022
PascalABC.NET 3.4.2, сборка 1814 от 02.10.2018

function ReadWhileSum(cond: integer->boolean): sequence of integer;

begin

 var s := 0;

 while True do

 begin

   var x := ReadInteger();

   s += x;

   if not cond(s) then break;

   yield x;  

 end;

end;


begin

 Println('Сред. арифм. =',ReadWhileSum(sum -> sum < 150)

                                                                        .Where(t->t.IsEven).Average);

end.


Cклавиатуры вводятся произвольные числа. необходимо вычислить среднее арифметическое всех введенных
4,7(37 оценок)
Открыть все ответы
Ответ:
Среднячёк
Среднячёк
06.09.2022

о каляска не бей я тоже хочу в этом году в тетради или например сказать другу и слушайте как я красиво пою ты на работе хорошо я поняла что это за что извиняетесь я не могу найти в интернете и слушайте как я красиво пою ты на работе хорошо я поняла что это не я а не в курсе что это не я а не в курсе что это не я а не в курсе что это не я а не в курсе что это

Объяснение:

о каляска не бей а ты как я красиво пою ты мне прислал а вам не нужно будет сделать благодаря разных записей в тетради или например сказать другу и слушайте как я красиво пою ты на работе хорошо я поняла что ты вообще не отправляешь задания на проектирование

4,8(80 оценок)
Ответ:
chery10
chery10
06.09.2022

ответ:

в те времена, когда компьютеры и интернет были предметами шика и роскоши, безумной популярностью пользовались компьютерные игровые клубы. десятки тысяч школьников по всей стране просиживали там практически всё своё свободное время. этот пост для тех, кто помнит что такое «пойти толпой на ночь».   в клубах была своя атмосфера. в прямом смысле слова: обычно здесь было душно, пахло куревом и дешёвым мужским одеколоном. основной контингент — школьники практически всех возрастов.   клубом админ. , это был царь и бог, с которым все старались завести дружбу потому что друзьям админ разрешал играть бесплатно. а ещё он сам мог играть во что угодно за своим главным компом, да ещё и получать за это деньги. тогда для всех посетителей клуба это было пределом мечтаний.

объяснение: выбери кратко какую-нибудь инфу

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