[NPRG052] Programovací jazyk Perl - 27.01.2015

Co se jinam nevejde
Uživatelský avatar
Davpe
Matfyz(ák|ačka) level II
Příspěvky: 98
Registrován: 22. 9. 2010 16:07
Typ studia: Informatika Bc.
Kontaktovat uživatele:

[NPRG052] Programovací jazyk Perl - 27.01.2015

Příspěvek od Davpe »

Program k přečtení (snad bez chyby):

Kód: Vybrat vše

while (<>) {
  chomp;
  print /^((\d+ | \((?1)\))([+*-](?2))* )$/ ? "OK
" : "KO
";
}
Program k napsání:
Na vstupu je infixový výraz s operátory +,- a * a s celými čísly. Vyhodnoťe ho.

Výsledek za 3.
Odpovědět

Zpět na „Ostatní“