Запишите значение переменной s, после выполнения данного алгоритма: Var s,k: integer; Begin s:= 0; for k:=4 to 8 do s:= s+6 div 2; writeln(s); End.