Järgnevate ülesannete sisendiks tehke tekstifail ühe lausega. Näiteks:
Laual on 15 ploomi ja 10 pirni.


Väljasta eraldi tekstifaili:

* Lauses leiduvate tähtede arv
* Kõik lause kahetähelised sõnad
* Kõik p-ga algavad sõnad
* Kõikide sõnade esitähed
* Kõik sõnad tagurpidi
* Lauses olnud arvude summa
* Lause, kus kõik tähemärgid on kooditabelis ühe võrra edasi nihutatud
* Kõigepealt paarituarvulise ja siis paarisarvulise järjekorranumbriga sõnad
* Arvudele järgnevad sõnad
* Arvudele eelnevad sõnad

____

Järgnev Pascali-programm trükib välja etteantud tähtede kõikvõimalikud
kombinatsioonid. 
Ülesandeks oli trükkida rekursiivselt välja etteantud tähtede kõikvõimalikud
kombinatsioonid. I lahendus:

program variandid;
var
  s: string;
  
procedure trykiVariandid(paigas, vaba: string);
var 
  uuspaigas, uusvaba: string;
  i:   integer;
begin
  writeln(paigas);
  for i:=1 to length(vaba) do begin
     uuspaigas:=paigas+copy(vaba, i, 1);
     uusvaba:=vaba;
     delete(uusvaba, i, 1);
     trykiVariandid(uuspaigas, uusvaba);
  end;
end;

begin
  writeln('Palun tekst:');
  readln(s);
  trykiVariandid('', s);
end.

Pange see sama programm tööle C++ - i vahenditega.