1. Определите, какое число будет напечатано на экране в результате выполнения следующей программы:
var a, b: integer;
begin
a := 0; b := 0;
while b < 150 do
begin
a := a+2;
b := b + 30;
end;
writeln(a);
end.
2. Определите, какое число будет напечатано на экране в результате выполнения следующей программы:
var a, b: integer;
begin
a := 0; b := 0;
while b
3. Определите, какое число будет напечатано на экране в результате выполнения следующей программы:
var a, b: integer;
begin
a := 0; b := 0;
while b
4. Определите, какое число будет напечатано на экране в результате выполнения следующей программы:
var a, b: integer;
begin
a := 0; b := 50;
while b >= 0 do
begin
a := a+1;
b := b — 5;
end;
writeln(a);
end.
5. Определите, какое число будет напечатано на экране в результате выполнения следующей программы:
B5. Анализ программ с циклами
var a, b: integer;
begin
a := 7; b := 28;
while b > 0 do
begin
a := a+1;
b := b — 3;
end;
writeln(a);
end.
6. Определите, какое число будет напечатано на экране в результате выполнения следующей программы:
var a, b: integer;
begin
a := 0; b := 2;
while b
7. Определите, какое число будет напечатано на экране в результате выполнения следующей программы:
var a, b: integer;
begin
a := 0; b := 2;
while b
8. Определите, какое число будет напечатано на экране в результате выполнения следующей программы:
var a, b: integer;
begin
a := 0; b := 2;
while b
9. Определите, какое число будет напечатано на экране в результате выполнения следующей программы:
var a, b: integer;
begin
a := 0; b := 0;
while b
10. Определите, какое число будет напечатано на экране в результате выполнения следующей программы:
var a, b: integer;
begin
a := 0; b := 0;
while b
Источник: infbu.ru