Question

Что будет выведено на экран после выполнения следующих операторов:
p:=1; i:=1;
repeat p: = p*2
i: =i-1;
until i<1;

Answer 1

Program (и название);
Var a,b,c word;
begin writeln (Введите a,b);
readln (a,b);
c:=a+b; writeln ('c='c);
readln,end.
Только не забывай точку с запятой всегда ставить, это очень важно! И потом когда вот это всё введёшь, надо нажать на зелёный треугольник и программа начнёт работать и вводишь сначала 5 нажимаешь ентер потом 2, нажимаешь ентер, и получается ответ!!!

Answer 2

1) p = p * 2 =  1 * 2 = 2;
2) i = i - 1 = 1 - 1 = 0;
3) i < 1 = true => выход из цикла
Результат: p = 2; i = 0