помогите перевести с паскаля в си++
var
s:string;
k:longint;
begin
read(s);
for i:=1 to length(s) do if s[i]='S' then k:=k+1;
writeln(k);
end.
Please enter comments
Please enter your name.
Please enter the correct email address.
You must agree before submitting.

Answers & Comments


Copyright © 2024 SCHOLAR.TIPS - All rights reserved.