if (nie podano opcji lub plików wejściowego i wyjściowego lub podano za dużo) then
write (Nieprawidłowa liczba parametrów!); else { podano prawidłowa liczbę parametrów wejściowych }
if (podano prawidłowa opcję) then
switch opcja ( v/ywołanie odpowiedniego modułu }
case 'r': Moduł reverse; case '1': Moduł lower; case 'u': Moduł upper; case 't': Moduł title;
case 's'; Moduł sentence;
• otherwise: write (Nieznany parametr!);
end; { end switch }
end; { end if opcja }
end; { end if prawidłowa liczba opcji }
while (jest następny wiersz) do
Funkcja getline; while (jest następny znak do
if (znak jest Funkcja
end;
end;
end;
Funkcja putline;
while (jest następny wiersz) do
Funkcja getline; while (jest następny znak do
if (znak jest Funkcja
end;
end ;
end;
Funkcja putline;
{ wczytuj kolejny wiersz ) w wierszu)
{ zamień mała/duża i odwrotnie } literą) then
switchchar; { zmień wielkość }
( end while jest znak I { end while jest wiersz )
I zapisz zmodyfikowany wiersz }
{ wczytuj kolejny wiersz ) w wierszu)
{ zamień na małą }
literą) then
lowerchar; ( obniż }
{ end while jest znak }
{ end while jest wiersz }
{ zapisz zmodyfikowany wiersz )
2