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

Question

Информатика

Нонюся

14 марта, 15:57

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

+4

Ответы (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.