найдите количество исковой буквы в заданном слове
Пожалуйста
в паскаль
очень нужно
сейчас сдавать
Ответы на вопрос
Ответил Вованичикчка
0
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.
Ответил KollBol
0
что значит lengts . паскаль выдает ошибку
Ответил Вованичикчка
0
length(s) - функция, которая возвращает длину строки s
Ответил KollBol
0
но паскаль выдает ошибку
Ответил Вованичикчка
0
какую ошибку?
Новые вопросы