№1. Определите значение переменной u после выполнения фрагмента программы. Решение показать с таблицы. Изобразите данный фрагмент программы на языке блок схем.
u := 0;
j := 1;
while j < 3 do begin
j := j + j;
u := u + j * j end;
№2. Определите значение переменной t после выполнения фрагмента программы. Решение показать с таблицы. Изобразите данный фрагмент программы на языке блок схем. Запишите на естественном языке, для решения какой задачи составлен этот алгоритм.
var t: integer;
begin
t := 200;
while (t mod 17 <>0) do t := t + 1;
writeln (‘ответ: ‘ , t)
end.
Вариант 2 (мальчики)
№1. Определите значение переменной u после выполнения фрагмента программы. Решение показать с таблицы. Изобразите данный фрагмент программы на языке блок схем.
u := 0;
j := 1;
while j < 3 do begin
u := u + 2 * j;
j := j + j end;
№2. Определите значение переменной t после выполнения фрагмента программы. Решение показать с таблицы. Изобразите данный фрагмент программы на языке блок схем. Запишите на естественном языке, для решения какой задачи составлен этот алгоритм.
var t: integer;
begin
t := 113;
while (t div 13 <> 10) do t := t + 1;
writeln (‘ответ: ‘ , t)
end.