Question

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.

Answer 1

В 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.