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