Question

СРОЧНО ПОМОГИТЕ!!!
Надо выполнить задания 2,3,4 ПО ПАСКАЛЮ, ДАЮ 10 БАЛЛОВ

Answer 1

Ответ:

№ 4

var a,b,c:real;

begin

 read(a,b);

 if (a>0) and (b>0) then

   c:=sqrt(a+b) else

     c:=a-b;

     writeln(c);

end.

Объяснение: