с заданием,учитель изверг и запрягает,издевается как может
Нужно составить агитационную листовку по теме сетевое взаимодействие

#include <iostream>

int main()

{

       using namespace std;

       const string password = "123456";

       string attempted;

       cout << "Enter correct password" << endl;

       for (int i = 0; i < 3; i++)

       {

               cin >> attempted;

               if (attempted == password)

               {

                       cout << "Successful login" << endl;

                       return 0;

               }

               else

               {

                       cout << "Wrong password" << endl;

               }

       }

       cout << "Access denied" << endl;

       return 0;

}

Вот:

program pole;
var a, b, c, d, n, kolvo, x, y: real;
begin
write ('За сколько часов топчет землю Нейромонах Феофан? ');
read (a);
write ('За сколько часов топчет землю Балалаечник Никодим? ');
read (b);
write ('За сколько часов топчет землю Косолапый Мишка? ');
read (c);
write ('За сколько часов топчет землю 1 Добрый Молодец? ');
read (d);
write ('За сколько часов нужно выкопать землю? ');
read (n);
x:=1/a+1/b+1/c;
kolvo:=(1/n-x)/(1/d);
if (kolvo<0) then write ('Группа справится без молодцев.') else
begin
y:=kolvo;
if (((trunc(y*10)) mod 10) <5) then
kolvo:=kolvo + 1;
write ('Вот столько вам потребуется добрых молодцев: ', round(kolvo));
end;
end.