В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
alinamensikova
alinamensikova
23.09.2021 02:02 •  Информатика

Составить программу подсчета количества встречаемых в тексте букв «ма».

Показать ответ
Ответ:
Лол1666
Лол1666
02.08.2021 17:54

3

Объяснение:

На простом примере:

x = 5; y = 10

Если 5 > 10, то максимум = 5, иначе максимум = 10

5 больше 10? Нет, следовательно максимальное значение 10. Совпало.

x = 10; y = 5

Если 10 > 5, то максимум = 10, иначе максимум = 5

10 больше 5? Да, следовательно максимальное значение 10. Совпало.

Если разбирать 1 пример:

x = 5; y = 10

Если 5 > 10, то максимум = 5, иначе максимум = 5

5 больше 10? Нет, а максимум у нас 5... Не совпало.

Если разбирать 2 пример:

x = 10; y = 5

Если 10 > 5, то максимум = 5, иначе максимум = 10

10 больше 5? Да, а максимум у нас 5... Не совпало.

0,0(0 оценок)
Ответ:
hvbdnnd
hvbdnnd
29.05.2023 18:39

PascalABC.NET

begin

 var a := ArrGen(10, i -> i in [0, 2, 6] ? 2 * (i + 1) + 10 :

     (i - 7) * 3);

 Writeln('массив');

 var m := a.Println.Where(p -> p.IsEven).Average;

 Write('sr=', m)

end.

begin

 var a := ArrGen(10, i -> (i + 1) mod 3 = 0 ? -i : Sqr(i + 2));

 Writeln('массив');

 var s := a.Println.Sum;

 Writeln('sr=', s);

 a.Transform(p -> p < 0 ? s : p);

 Writeln('новый массив');

 a.Print

end.

begin

 var a := ArrGen(15, i -> i < 7 ? i * (i + 6.1) + 5.1 : i - 4.7);

 Writeln('массив');

 foreach var k in a do

   Write(k:7:2);

 Writeln;

 var p := 1.0;

 for var i := 2 to 4 do

   p *= a[i];

 Write('p= ', p:0:3)

end.

Индексы в массивах PascalABC.NET идут не от единицы, а от нуля, как во всех современнных языках программирования. Поэтому исходные формулы пришлось немного преобразовать.

Примеры вывода не показаны, поскольку они точно совпадают с заданными.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота