Question

35 БАЛЛОВ!
паскаль
Задана строка состоящая из больших букв латинского алфавита заканчивающаяся восклицательным знаком (!). Подсчитать количество входящих в строку букв Q.

Входные данные

строка из больших букв латинского алфавита оканчивающаяся восклицательным знаком. Количество символов в строке заранее не известно, но не превышает 1000.

Выходные данные

целое число — количество символов Q в заданной строке.

Пример

на входе:

QUQU!

на выходе:

2

Answer 1

// PascalABC.NET 3.4, сборка 1766 от 25.08.2018

begin

var a:= ReadString;

a[:a.IndexOf('!')+1].ToCharArray.Where(t->t='Q').Count.Println;

end.

Пример:

QUQU!

2