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

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

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