Yulia Гафина
Помогите с паскалем?
В строке подсчитать количество заданных букв, например в такой строке: sfdkhvbdsfvdsfbfvsdfbvshfvb подсчитать количество букв f. Помогите пожалуйста)
В строке подсчитать количество заданных букв, например в такой строке: sfdkhvbdsfvdsfbfvsdfbvshfvb подсчитать количество букв f. Помогите пожалуйста)
Для этого есть функция: Length(str);
где str - ваша строка, на выходе получаете число, характеризующие количество букв в строке str.
s.each_char do |ch| if (ch == 'f') then c++; end;
var c:char; s:string; i,k:integer;
begin write("string? '); readln(s)
write("character? '); readln(c); k:=0;
for i:=1 to length(s) do if s[ i]=c then inc(k);
writeln(k); readln
end.
Пишите на почту или в асю 586178755