VAR S,K: INTEGER;
BEGIN
S:=100;
FOR K:=1 TO 9 DO
S:=S-5;
WRITELN \(S\)
END.