Составьте программу ,которая опеделяет ,какая - вопрос №6586921 от Саня3411 27.01.2023 16:53

Question

Информатика: Составьте программу ,которая опеделяет ,какая из букв и или ы встречается чаще в введенной с клавиатуры строке .

Саня3411 · Answer

Begin
var s := readstring();
if (s.Where(x -> x = 'ы').Count) > (s.Where(x -> x = 'и').Count)
then write('"Ы" больше')
else if (s.Where(x -> x = 'ы').Count) < (s.Where(x -> x = 'и').Count)
then write('"И" больше')
end.

Составьте программу ,которая опеделяет ,какая из букв 'и' или 'ы' встречается чаще в введенной с клавиатуры строке .