РЕБЯТ ДАМ 20 БАЛЛОВ!!!
В программе описан одномерный целочисленный массив с индексами от 0 до 100. Ниже представлен фрагмент программы, обрабатывающей данный массив:
n:= 100;
for i:=0 to n do A[i]:=i;
for i:=1 to n do begin
A[i]:= A[i]-A[i-1];
end;
s:=A[90];
Укажите значение, которое после выполнения указанного фрагмента программы будет записано в переменную s.

В S будет 45можешь проверить, вот дописанная программа :var  n, i, s: integer;  a: array [0..100] of integer;begin  n := 100;  for i := 0 to n do A[i] := i;  for i := 1 to n do   begin    A[i] := A[i] - A[i - 1];   end; s := A[90];  writeln(s);end.