Тест b19 - обработка массивов в программе используется одномерный целочисленный массив ас индексами - id1029482320211217 от sssssss23 17.12.2021 08:20

Question

Информатика: Тест b19 - обработка массивов в программе используется одномерный целочисленный массив ас индексами от 0 де 9. значения элементов равны 1, 5, 3, 7, 9, 8, 1, 12, 6, 14 соответственно, т.е. a [0] =1, a[ 1] =5ит.д. определите значение переменной ѕ после выполнения следующего фрагмента этой программы: s : = 0; n: = 10; for i: =1 to n-2 do begin s : = s + a[i] - a[i+1]; end; вредите правильный ответ​

sssssss23 · Accepted Answer

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

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

MOGZ ответил