даны 2 числа больше некоторого введенного k получить квадрат из модулей, если числа отрицательные, то сложить их, в противном случае увеличить числа в 3 раза

Question

Информатика

Валя

11 июля, 23:33

даны 2 числа больше некоторого введенного k получить квадрат из модулей, если числа отрицательные, то сложить их, в противном случае увеличить числа в 3 раза

+2

Ответы (1)

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

Мефодий · Answer 1

Var a, k, v:real;

begin

readln (a, k) ;

if a>k then begin

v:=abs (a*a) ;

write (v) ;

end;

if (a<0) and (k<0) then

v:=a+k

else

writeln (a+3,' ', k-3) ;

end.