сегодня контрольная, лучший ответ. на языке программирования Basic или Паскаль

четвёртое задание

а = 5

5>0

да. нет

а=5+5. а=5-5

Объяснение:

pascal

program ex3;

var a,b,c,d:real;

begin

read(a,b);

c:=sqr(a)+sqr(b);

d:=sqrt(c);

writeln (c);

end.

program ex4;

var a: integer;

begin

read(a);

if a>5 tnen

a:=a+5

else a:=a-5;

end.