Поделиться
Практическая работа. «Циклы с предусловием и постусловием».docx
Практическая работа. «Циклы с предусловием и постусловием»
1. Определите, что будет напечатано в результате работы следующей программы.
Program Pr_1;
Var k, s : integer;
Begin
k := 9;
s := 43;
while s >= 0 do
begin
k := k - 1;
s := s – 2 * k;
end;
Writeln (k);
end.
Для решения выполни программу по шагам, занося значения переменных в таблицу:
|
Выполняемый оператор |
Истинность условия |
Значения переменных
|
|
|
k |
s |
||
|
|
|
|
|
2. Определите, что будет напечатано в результате работы следующей программы.
Program Pr_2;
Var n, s : real;
Begin
n := 0;
s:= 50;
while s >= 15 do
begin
s := s - 3;
n := n + 1;
end;
Writeln (n)
end.
Для решения выполни программу по шагам, занося значения переменных в таблицу:
|
Выполняемый оператор |
Истинность условия |
Значения переменных
|
|
|
k |
s |
||
|
|
|
|
|
3. Определите, что будет напечатано в результате работы следующего фрагмента.
s := 1;
x :=2;
k := 0;
x:= z * x;
while k < 10 do begin
s := s * x; k := k + 1;
end;
Writeln (s);
Материалы на данной страницы взяты из открытых источников либо размещены пользователем в соответствии с договором-офертой сайта. Вы можете сообщить о нарушении.
