четвёртое задание
а = 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;
read(a);
if a>5 tnen
a:=a+5
else a:=a-5;
четвёртое задание
а = 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.