(* * * jmeno: * max3 * popis: * ze tri cisel nejvetsi prirozene cislo ze tri * * level: 0 * * zadani: * Vyberte nejvetsi prirozene cislo ze tri. * * input: * Jedno zadani na radku, zadani ma tvar: *. Z: a b c * kde Z je cislo zadani a,b,c jsou zkoumana cisla. * * output: * Pro kazde zadani vytiskne radek ve tvaru: *. Z: max * * soubory: * max3.pas, max3.out, max3.in * * au: vitas@popelka.ms.mff.cuni.cz * cp: gpl * *) var { cislo zadani } Z: Integer; { dvojtecka } dt: Char; a, b, c: Integer; begin repeat read(Z, dt, dt); read(a, b, c); write(Z, ': '); if a > b then if a > c then writeln(a) else { c >= a } writeln(c) else { b > a } if b > c then writeln(b) else { c >= b } writeln(c) until Z = 0; end.