Question

5.Какое число будет напечатано на экране компьютера в результате выполнения фрагмента программы?
a:=4 ; b:=16 ;
If b/2>=a*2 Then
begin
a:=b-a;
b:=b*2-a; end
Else
begin
a:=a*b;
b:=b-a*2; end;
Writeln(b);
6.Какое число будет напечатано на экране компьютера в результате выполнения фрагмента программы?
a:=20 ; b:=30 ; c:=10;
If (a<=b) and (a<=c) Then
m:=a
Else
If (b<=a) and (b<=c)Then
m:=b
Else
m:=c;
Writeln(m);
7.Чему будет равно значение переменной a в результате выполнения фрагмента программы?
a:=2 ; b:=4 ;
If b/2>=a*2 Then
begin
b:=b+1;
a:=b+a;
end
Else
begin
b:=b*2;
a:=a*b;
end;
Writeln(a);

Answer 1

5) Ответ: 20
6) Ответ: 10
7) Ответ: a = 16

// проверено в PascalABC.NET