Напишите программу, которая считывает одну строку, после чего выводит «МЯУ», если в введённой строке есть подстрока «кот», и «ГА

Question

4 года назад

14

В» в противном случае.

Пример 1
Ввод Вывод
Извините, пожалуйста, вы не подскажете, который час?
МЯУ
Пример 2
Ввод Вывод
Кто я? кто
ГАВ

1 ответ:

Lena000k · Answer 1 · 2020-05-20T17:11:13+03:00

<h3>PascalABC.NET 3.4.2, сборка 1843 от 24.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>

begin

if ReadlnString.ToLower.Contains('кот') then Print('МЯУ')

else Print('ГАВ')

end.

<h2>Примеры</h2>

Извините, пожалуйста, вы не подскажете, который час?

МЯУ

Кто я? кто

ГАВ