Опубликовано 13.06.2017 по предмету Информатика от Гость >> <<

После исполнения операторов 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 получит значение

Ответ оставил Гость

Программу надо сформатировать и тогда её структура будет видна лучше.
А чтобы понять, как идет выполнение, в нужных точках ставим промежуточную выдачу - это называется "трассировкой".

var
  s, k: integer;
label
  met;
begin
  s:=-12;
  k:=90;
  Writeln(s=,s,, k=,k);
  s:=s+10;
  Writeln(s=,s);
met:
  Writeln(Метка met:);
  k:=k+10; Write(k=,k);
  if k<200 then s:=50 else s:=s+k;
  Writeln(, s=,s);
  if k<200 then goto met;
  Writeln(Результат: s=,s)
end.

Результат выполнения программы:
s=-12, k=90
s=-2
Метка met:
k=100, s=50
Метка met:
k=110, s=50
Метка met:
k=120, s=50
Метка met:
k=130, s=50
Метка met:
k=140, s=50
Метка met:
k=150, s=50
Метка met:
k=160, s=50
Метка met:
k=170, s=50
Метка met:
k=180, s=50
Метка met:
k=190, s=50
Метка met:
k=200, s=250
Результат: s=250