Паскаль var s,k begin s=8 for k =2to8 s =s+8

Вот так можно исправить, чтоб заработало

var
    s, k: integer;

begin
    s := 8;
    for k := 2 to 8 do
        s := s + 8;
    writeln(s);
end.