gabinety

WRITE ("Czy harmonogram został ustalony? Tak/Nie");
READ (harmonogramGotowy);

FOR gabinety[i] {
  WRITE ("Czy gabinet nr" i "jest dostępny? Tak/Nie");
  READ (dostepnosc);
  IF (dostepnosc == 'Nie') {
    wszystkieDostepne = 'Nie';
    }
}

FOR wymagania[i] {
  WRITE ("Czy wymaganie" wymagania[i] "zostało spełnione? Tak/Nie");
  READ (spelnione);
  IF (spelnione == 'Nie') {
    wszystkieSpelnione == 'Nie';
    }
}

WRITE ("Czy nasieniono poprawki? Tak/Nie");
READ (poprawkiNaniesione);

IF (harmonogramGotowy == 'Tak' && wszystkieDostepne == 'Tak' && wszystkieSpelnione == 'Tak' && poprawkiNaniesione == 'Tak') {
  WRITE (harmonogram);
} ELSE {
  WRITE (propozycjeHarmonogramu);
}