Определите, что будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.
Var s, k: integer;
Begin
s := 100;
for k := 1 to 9 do
s := s - 5;
write (s);
End.