Помогите плиз.
Напишите, что будет выведено на экран в ходе выполнения фрагмента программы:
a) y := 0; FOR x := 1 TO 9 do y := y + x; Writeln (y);
b) y := 0; FOR x := 1 TO 5 do y := y * x; Writeln (y);

Спс.Если можешь объясни плиз

На экран будет выводится: А) 45 y := 0; FOR x := 1 TO 9 do y := y + x; В начале y=0;Потом начинается цикл : от 1 до 9 (включительно и с шагом в единицу(+1))X:=1; y:=0+1; y:=1;x:=2; y:=1;y:=x+y; y:=2+1; y:=3 ;x:=3;y:=3; y:=3+3; y=6;x:=4;y:=6; y:=4+6; y=10;и т.д. по аналогии Б)0 y := 0; FOR x := 1 TO 5 do y := y * x; Writeln (y);При умножение числа на 0 будет 0;Т.к. y := 0; , то в равенстве y := y * x; , при любом значение x, y будет = 0