Тренажер по теме "Программирование циклов с заданным условием продолжения работы"

Проанализируйте работу программы.
program math;
var x,  у:  integer; 
begin
x:=l;
y:=l;
while x<5 do
begin у:=У*2; x:=x+l
end; 
end.
Ответьте на вопрос:Сколько раз исполнится тело цикла?

Проанализируйте работу программы.
program math;
var x,  у:  integer; 
begin
x:=l;
y:=l;
while x<5 do
begin у:=У*2; x:=x+l
end; 
end.
Ответьте на вопрос:Какое   значение   примет   х   после   завершения   про­граммы?

Проанализируйте работу программы.
program math;
var x,  у:  integer; 
begin
x:=l;
y:=l;
while x<5 do
begin у:=У*2; x:=x+l
end; 
end.
Ответьте на вопрос:Сколько раз исполнится тело цикла, если изменить команду х:=х+1 на х:=х+2?

Определите значение переменных s и i после выполне­ния фрагмента программы.

s:=0;
i:=0;
while    i<5    do
begin
i:=i+l; s:=s+i; 
end;

Определите значение переменных s и i после выполне­ния фрагмента программы.

s:=0;
i:=0;
while    i<5    do    i:=i+l;
s:=s+i;

Определите значение переменных s и i после выполне­ния фрагмента программы.

s:=0;
i: =2 ;
while    i>l    do
begin
s:=s+l/i;
 i:=i-l; 
end;

Определите  значение  переменной   s  после  выполнения фрагмента программы при указанных значениях а.(а=23)
р:=а;
s:=0;
while    p>0    do
begin
s :=s+p mod 10;
p: =p div 10; 
end;

Определите  значение  переменной   s  после  выполнения фрагмента программы при указанных значениях а.(а=32)
р:=а;
s:=0;
while    p>0    do
begin
s :=s+p mod 10;
p: =p div 10; 
end;

Определите  значение  переменной   s  после  выполнения фрагмента программы при указанных значениях а.(а=109)
р:=а;
s:=0;
while    p>0    do
begin
s :=s+p mod 10;
p: =p div 10; 
end;

Определите,   что   будет   выведено   в   результате   работы программы.

Алгоритмический язык:
алг
цел    s,     k 
нач
s:=0 к:=0 
нц    пока    к<6
s:=s+2
k:=k+l 
кц
вывод s
кон

Определите,   что   будет   выведено   в   результате   работы программы. (ввести значение k,t)