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

Марк
Jul 18, 2019
Begin
var s := readstring();
if (s.Where(x -gt; x = ы).Count) gt; (s.Where(x -gt; x = и).Count)
then write("Ы" больше)
else if (s.Where(x -gt; x = ы).Count) lt; (s.Where(x -gt; x = и).Count)
then write("И" больше)
end.
var s := readstring();
if (s.Where(x -gt; x = ы).Count) gt; (s.Where(x -gt; x = и).Count)
then write("Ы" больше)
else if (s.Where(x -gt; x = ы).Count) lt; (s.Where(x -gt; x = и).Count)
then write("И" больше)
end.
204