Question

Определите значение переменной S после выполнения программы:
VAR A,S: INTEGER;
BEGIN
S:=0;
FOR A:=1 TO 4 DO S:=S*A;
WRITELN('S=', S);
END.

Answer 1

Ответ:

S=0 так как изначально была нулем и поятоянно умнажалось на числа

а как мы знаем любое число умноженное на ноль будет ноль

Объяснение: