После исполнения операторов S : = - 12; k : = 90; S : = s + 10; Met: k : = k + 10; If k < 200 then S : = 50 else s : = s + k; If k < 200 then goto met; переменная S получит значение

Программа:

program S_k_met;

var S, k:integer;

label met;

begin

S : = - 12;

k : = 90;

S : = s + 10;

Met: k : = k + 10;

If k < 200 then S : = 50 else s : = s + k;

If k < 200 then goto met;

writeln ('s = ', S)

end.

При первом выполнении команд до перехода на метку met переменные приобретут значения:

S = - 12;

k = 90;

S = S + 10 = - 12 + 10 = - 2;

k = k + 10 = 90 + 10 = 100;

S = 50;

k меньше 200 - происходит возврат на метку met.

Возвращении на метку с увеличением k на 10 будет происходить до достижения переменной значения 200, при котором первое условие выполнится по ветке else:

S = S + k = 50 + 200 = 250.

После этого программа завершится выводом значения.

Ответ: S = 250.