Помогите решить 2 задачи...1) Вывести на экран квадрат наибольшего из 2 введенных чисел? 2) Вывести на экран корень наибольшего из 3 введенных чисел?

Question

Помогите решить 2 задачи...1) Вывести на экран квадрат наибольшего из 2 введенных чисел? 2) Вывести на экран корень наибольшего из 3 введенных чисел?

Помогите решить 2 задачи... 1) Вывести на экран квадрат наибольшего из 2 введенных чисел? 2) Вывести на экран корень наибольшего из 3 введенных чисел?

Гость

Ответ(ы) на вопрос:

Accepted Answer

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.