Написать программу выбора наибольшего значения из трех различных чисел.
Ну если это паскаль то тогда : program a1; var a,s,d,max : integer; BEGIN writeln('введите 3 числа'); readln(a,s,d); max:=a; if maxif maxwriteln('max=',max); end.