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

Answer 2

Посмотрите на диалект Паскаля, на котором написан код

Answer 3

Достаточно a[:a.IndexOf('!')+1].Count(t->t='Q').Println;

Answer 4

А дитя неразумное не слушайте, оно не ведает, что пишет.

Answer 5

Ну да, можно без массива символов, забыл, что методы строк за элементы берут именно символы строки. Роли особой, думаю, не играет

Answer 6

Нет, конечно, просто короче.