Массив а вводится с клавиатуры найти среднее арифметическое его элементов с нечетными номерами.размер произвольный .решение паскаль .решите

Program asd; uses crt; const n=5; var a: array[1..n] of integer; i,ind: integer; s,sr: real; begin clrscr; writeln('заполните массив числами: '); for i: =1 to n do   begin   write('a[',i,']: ');   readln(a[i]);   end;   for i: =1 to n do   begin     ind: =i;     if not ind mod 2 = 0 then     begin       s: =s+a[i];       sr: =s/n;     end;   end;   writeln('ср. ар. элементов с нечетными индексами: ',sr); end.

Uses crt; var s,i,x : integer; begin read(x); for i: =1 to 5 do begin                                     s: =s + (x mod 10);                                     x: =x div 10;                                 end; write (s); end. язык - паскальabc если хочешь можешь еще сделать проверку на пятизначное число.

Уэтого термина существуют и другие значения, см.  ньютон. исаак ньютонisaac newtonпортрет кисти  кнеллера  (1689)дата рождения: 25 декабря 1642  (4 января  1643)место рождения: вулсторп,  линкольншир,королевство смерти: 20 марта 1727  (31 марта  1727)(84 года)место смерти: кенсингтон,  мидлсекс,  ,королевство великобританиястрана:   королевство   королевство великобританиянаучная сфера: ,  механика,  ,астрономияальма-матер: кембриджский университет(тринити-колледж)подписьисаак ньютон  на  викискладе сэр  исаа́к нью́тон  (или  ньюто́н[k 1]) (.  sir isaac newton,  25 декабря 1642  года  —  20 марта 1727  года  по  юлианскому календарю, действовавшему в до  1752 года; или  4 января  1643 года  —  31 марта  1727 года  погригорианскому календарю)  —    ,  ,  механик  и  астроном, один из создателей классической . автор труда « начала натуральной философии», в котором он изложил  закон всемирного тяготения  и  три закона механики, ставшие основой  классической механики. разработал  дифференциальное и интегральное исчисления, теорию  цветаи многие другие и теории.