Нужно переделать из паскаля в С++ var f: text; s: string; i, lect, pract, lab: byte; begin assign(f,'lessons.txt'); reset(f); lect := 0; pract := 0; lab := 0; while not Eof(f) do begin readln(f,s); i := pos('лекц.',s); if i <> 0 then lect := lect + 1 else begin i := pos('практ.',s); if i <> 0 then pract := pract + 1 else begin i := pos('лаб.',s); if i <> 0 then lab := lab + 1 end; end; end; close(f); writeln('Лекций: ', lect); writeln('Практических: ', pract); writeln('Лабораторных: ', lab); end.
Нужно переделать из паскаля в С++ var f: text; s: string; i, lect, pract, lab: byte; begin assign(f,'lessons.txt'); reset(f); lect := 0; pract := 0; lab := 0; while not Eof(f) do begin readln(f,s); i := pos('лекц.',s); if i <> 0 then lect := lect + 1 else begin i := pos('практ.',s); if i <> 0 then pract := pract + 1 else begin i := pos('лаб.',s); if i <> 0 then lab := lab + 1 end; end; end; close(f); writeln('Лекций: ', lect); writeln('Практических: ', pract); writeln('Лабораторных: ', lab); end.
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
using namespace std;
int main() {
while (getline(f, s)) {ifstream f("lessons.txt");
string s;
int lect = 0, pract = 0, lab = 0;
size_t i = s.find("лекц.");
if (i != string::npos) {
lect++;
} else {
i = s.find("практ.");
if (i != string::npos) {
pract++;
} else {
i = s.find("лаб.");
if (i != string::npos) {
lab++;
}
}
}
}
f.close();
cout << "Лекций: " << lect << endl;
cout << "Практических: " << pract << endl;
cout << "Лабораторных: " << lab << endl;
return 0;
}