1 Что будет выведено на экран после выполнения фрагмента программы:
begin
m:=5;
If m>5 then y:=5+ m else y:=100-m;
Writeln (y);
end.
2 Что будет выведено на экран после выполнения фрагмента программы:
begin
x:=0;
if x<>5 then y:=10 else y:=0;
writeln (y);
end.
3 Что будет выведено на экран после выполнения фрагмента программы:
begin
a:=12;
if a>10 then n:=a+5 else n:=a-1;
writeln (n);
end.

var x,y,nod,nok: longint;

begin

read(x,y);

a: =x; b: =y;

while (a> 0) and (b> 0) do

if a> b then a: =a mod b

else b: =b mod a;

nod: =a+b;

nok: =(x div nod)*y;

write(nok);

end;

n = 64

2^i = n

2^i = 64

i = 6 бит

ответ. 6 бит.

1 input a

2 input b

3 input c

20 if a> b then goto 60

30 if b> c then goto 110

40 max=с

50 goto 120

60 if a> c then goto 90

70 max=с

80 goto 120

90 max=a

100 goto 120

110 max=b

120 if a< b then goto 160

130 if b< c then goto 210

140 min=с

150 goto 220

160 if a< c then goto 190

170 min=с

180 goto 220

190 min=a

200 goto 220

210 min=b

220 print min*max

самым главным считается объем