найдите количество исковой буковкы в данном словеПожалуйста в паскаль очень необходимо

Найдите количество исковой буковкы в данном слове
Пожалуйста
в паскаль
очень необходимо
на данный момент сдавать

Задать свой вопрос
1 ответ

var c, s: string;

i, sum: integer;

begin

   s:='moloko';

   c:='o';

   sum:=0;

   for  i:=1 to length(s) do

       if s[i] = c then

           sum += 1;

   writeln(sum);

end.

Ига Степан
что означает lengts . паскаль выдает ошибку
Маргарита
length(s) - функция, которая отдаёт длину строчки s
Марина
но паскаль выдает ошибку
Хоменко Славик
какую ошибку?
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт