Найти квадрат наибольшего из двух чисел а и b и отпечатать признак N=1, если наибольшим является а, и признак N=2 - в противном случае.

Question

Информатика

Альберта

12 ноября, 22:27

Найти квадрат наибольшего из двух чисел а и b и отпечатать признак N=1, если наибольшим является а, и признак N=2 - в противном случае.

+3

Ответы (1)

Знаете ответ?

Виолетка · Answer 1

Var a, b:real;

begin

writeln ('vvedi a:') ;

readln (a) ;

writeln ('vvedi b:') ;

readln (b) ;

if (a*a) > (b*b) then writeln ('N=1') else writeln ('N=2') ;

end.