Регистрация
bpanraw
27.10.2021 02:33
Информатика
Есть ответ 👍

задание 5
дан программный код
определи какой результат получится на выходе
"ошибка"
5
6
7

296
403
Посмотреть ответы 1

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

alimbekoffniki
alimbekoffniki
4,4(61 оценок)
PascalABC.NETbeginvar s := ReadString.ToWords.Select(x->x.Count(c->c='а')).ToArray; if s.All(x->x=s[0]) then Print('Одинаково') else Print('Больше в',s.IndexMax+1) end.

!Для любого количества слов!

Пример работы:


Даны два слова. Определить, в котором из них букв «а» больше ПАСКАЛЬ.​
Даны два слова. Определить, в котором из них букв «а» больше ПАСКАЛЬ.​

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