Помогите решить 2 задачи... 1) Вывести на экран квадрат наибольшего из 2 введенных чисел? 2) Вывести на экран корень наибольшего из 3 введенных чисел?
2)program MaxOfThree; var a, b, c: integer; begin readln(a, b, c); if a > b then begin if a > c then begin writeln(a) end else begin writeln(c) end end else begin if b > c then begin writeln(b) end else begin writeln(c) end end end.