Задание

Запишите зна­че­ние пе­ре­мен­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы:

Var s,k: integer;
Begin
s := 50;
for k := 0 to 8 do
s := s - 4;
writeln\(s\);
End.