Дан файл f. Напечатать в файл g, количество строк, в которых имеется ровно 5 букв "и"

#include
#include
#include

int main() {
std::ifstream in("f.txt");
std::ofstream out("g.txt");
std::string s;
while (std::getline(in, s)) if (std::count(s.begin(), s.end(), 'и') == 5) out << s << '\n';
}

Update:
> забыл написать, надо в Паскале решить
Поздно, уже написал на С++