1)составить программу определяющую наибольшее значение х,y,z 2)составить программу проверяющую правильность пароля
1) var a,b,c:integer; begin read(a);read(b);read(c); if (a>=b) and (a>=c) then write('Max=',a) else if (b>=a) and (b>=c) then write('Max=',b) else if (c>=a) and (c>=b) then write('Max=',c); end. 2) Правильность пароля это как понять? =)