Question

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

Answer 1

Ответ:

3 задание

начало

конец

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

а = 5

5>0

да. нет

а=5+5. а=5-5

Объяснение:

лучший плисс

Answer 2

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.