Предмет: Информатика,
автор: daryaka220797
помогите перевести с паскаля в си++
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.
Ответы
Автор ответа:
0
#include <iostream>
#include <string>
using namespace std;
int main() {
string s; cin >> s;
long k = 0;
for (size_t i = 0; i < s.length(); i++) {
if (s[i] == 'S') k++;
}
cout << k << 'n';
return 0;
}
#include <string>
using namespace std;
int main() {
string s; cin >> s;
long k = 0;
for (size_t i = 0; i < s.length(); i++) {
if (s[i] == 'S') k++;
}
cout << k << 'n';
return 0;
}
Похожие вопросы
Предмет: Информатика,
автор: dianakz89
Предмет: Қазақ тiлi,
автор: Аноним
Предмет: Қазақ тiлi,
автор: Аноним
Предмет: Литература,
автор: Аноним
Предмет: Математика,
автор: ВикторияСнегурочка