1. Информатика
  2. Даны два слова. Определить,

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


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

dfgds1 dfgds1    3   18.06.2020 22:02    18

Ответы
anka4323 anka4323  13.08.2020 12:15
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.

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

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


Даны два слова. Определить, в котором из них букв «а» больше ПАСКАЛЬ.​
Даны два слова. Определить, в котором из них букв «а» больше ПАСКАЛЬ.​
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
dolloc dolloc  13.12.2021 19:39
Язык ! С консоли вводятся два числа через пробел, как считать их в типе флоат в две переменные?...
hilton1 hilton1  13.12.2021 19:42
Какое опасное излучение от компьютера и безопасное в цифрах дать ответ...
narutoluffi1 narutoluffi1  13.12.2021 19:42
Программирование(python) В чем ошибка from tkinter import * t = turtle.Pen() t.color( blue )#Встановлюємо колір черепашки t.penup()#Піднімаємо курсор t.goto(-110, -25) #Переходимо...
Котеня244 Котеня244  13.12.2021 19:43
Пропускная некоторого канала связи равна 128 000 бит/с . сколько времени займет передача по этому каналу файла объемом 500 Кбайт по этому каналу? а) 30с.б)32с.в)4мин.г)240с....
pamagiteplease pamagiteplease  15.05.2020 05:12
Составьте линейную программу нахождения остатка и целой части от деления двух натуральных чисел, введённых с клавиатуры, если известно, что числа не превышают 5000. Вывод ответа...
sahrona04 sahrona04  15.05.2020 02:30
Написать программу, в которой осуществляется ввод целых чисел (ввод осуществляется до тех пор, пока не будет введен 0) и определяется наименьшее из введенных чисел.(Делать всё...
mialia9922 mialia9922  15.09.2019 06:40
Исправьте ошибки в программе описать запись с именем price, содержащую следующие поля: название товара, на- звание магазина, в котором продается товар; стоимость товара в рублях....
шота1 шота1  15.06.2019 09:00
Переведите число 222 в шестнадцатеричную систему счисления...
Toxichnui Toxichnui  15.06.2019 09:00
Вкакой системе счисления записаны числа 214=140+24...
дан55566 дан55566  09.08.2019 01:10
Переведите число 419 из десятичной системы счисления в двоичную, переведите число 1110010110 из двоичной в восьмеричную и шестнадцатеричную...

Популярные вопросы