Question

№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.