Бағдарлама бөлігінің орындалу нәтижесін анықта:  b:=4;   for j:=1  to  b   do x:=j;  writeln(x-b+7);