Даны три числа a, b и с. Вычислить и вывести на экран дисплея значение z, равное квадрату большего из них.

Question

Геннадия

21 марта, 11:57

+5

Ответы (1)

Знаете ответ на вопрос?

Надина · Answer 1

Var

a, b, c: integer;

begin

readln (a, b, c) ;

if b > a then a : = b;

if c > a then a : = c;

writeln ('z = ', a * a) ;

end.