Подсчитать количество букв "t" в предложении на английском языке - Pascal

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

Листинг программы

k:=0;
for i:=1 to length(s) do
if s[i]='t' then k:=k+1;

Объяснение кода листинга программы

В начале программы объявляется переменная k и инициализируется значением 0. Это будет счетчик количества букв t.
Затем объявляется переменная s и инициализируется значением строки, которая содержит предложение на английском языке.
Далее идет цикл for, который проходит по каждому символу в строке s.
Внутри цикла проверяется, является ли текущий символ буквой t. Если да, то значение переменной k увеличивается на 1.
После завершения цикла, возвращается значение переменной k, которое и будет являться количеством букв t в предложении.