Program tcd; var a,b,c: integer; begin readln(a,b,c); writeln(,a,'*',b,'*',c,'=',a*b*c); writeln(,a,'+',b,'+',c,'=',a+b+c); if (a> b) and (a> c) then writeln(a,' -большее'); if (b> a) and (b> c) then writeln(b,' -большее'); if (c> a) and (c> b) then writeln(c,' -большее'); end.
Популярные вопросы