Составьте программу вычисления суммы элементов массива от второго положительного и до конца я составил такой код, но вот только сумму он определяет не так. есть какие-то идеи? program qq; const n=10; var a: array[1..n] of integer; i, p, j, sum: integer; begin for i: =1 to n do begin a[i]: =random(20)-10; write(a[i], ' '); end; j: =0; for i: =1 to n do begin if a[i]> 0 then j: =j+1; if j = 2 then p: =i; end; for i: =p+1 to n do sum: =sum+a[i]; writeln(); writeln('сумма элементов от второго положительного: ', sum); end.

У вас что-то слишком сложная структура для такой задачи.
Предлагаю вариант покороче, скрин и исходник в приложении.
Складывает все числа (положительные и отрицательные) начиная со второго положительного включительно, то есть второй элемент так же будет задействован.

Мета:

    навчальна: повторити правила поведінки в кабінеті інформатики актуалізувати вивчені раніше поняття: інформація, повідомлення, дані, інформаційний процес; сформувати поняття: кодування даних, декодування даних, передавач, приймач, канал зв'язку; сформувати вміння користуватися готовими системами кодування та розробляти власні системи кодування.    розвивальна: розвивати логічне мислення та креативність; сприяти розвитку логічного мислення, пам’яті, уваги і;    виховна: виховувати інформаційну культуру; виховувати уважність та відповідальність, бажання мати глибокі та якісні знання.Тип уроку: Комбінований.

Хід уроку

І. Організаційний етап

Повторення правил поведінки в кабінеті інформатики

ІІ. Актуалізація опорних знань

    Що таке інформація? (відомості про навколишній світ і явища, які в ньому відбуваються, називають інформацією.)    Хто чи що може бути приймачем інформації?  (людина, тварина, різноманітні пристрої)    Як людина сприймає інформацію? (Людина отримує інформацію  органами чуття )Як сприймають інформацію пристрої? (за до датчиків чи сенсорів.)    Що таке повідомлення? (Людина отримує інформацію з навколишнього середовища за до повідомлень)    Які бувають повідомлення за сприйняття, формою подання, за призначенням? (Тому за сприйняття повідомлення поділяють на зорові, смакові, нюхові, слухові і дотикові. Також повідомлення поділяють за формою подання — на текстові, числові, графічні, звукові, відео та комбіновані; за призначенням — на масові, спеціальні, особисті, наукові, технічні, розважальні тощо.)    Що називають інформаційними процесами? (Дії, які можна виконувати з інформацією, що міститься у повідомленні, називають інформаційними процесами. До них відносять зберігання, опрацювання, передавання, отримання, пошук, захист тощо)

ІІІ. Мотивація навчальної діяльності

Слово вчителя. Упродовж життя людина отримує безліч повідомлень, тому часто виникає потреба зберегти отримані знання або передати їх комусь іншому. Як це зробити?

IV. Вивчення нового матеріалу

Ще в прадавні часи люди опрацьовували інформацію, отриману з навколишнього середовища, і подавали її у вигляді наскельних малюнків. Зрозуміло, що передавати збережену таким чином інформацію було дуже незручно.

Ви знаєте, що інформація передається за до повідомлень, які можна подати текстовим, графічним, звуковим , а також відео, жестами та декількома одночасно — комбінованим повідомленням.

Для подання усних повідомлень ми використовуємо мову. А будь-яке письмове повідомлення складається з набору різних знаків (символів), які належать певному алфавіту. Наприклад, для подання числових даних використовують алфавіт, що складається з 11 знаків: цифр 0–9 і десяткової коми для відокремлення цілої та дробової частини в десятковому дробі.

Інформацію, подану у вигляді, прийнятному для передавання, опрацювання, збереження, називають даними.

Під опрацюванням даних розуміють такий інформаційний процес, в результаті якого ми отримуємо нові дані або дані, подані в інший іб.

Повідомлення передаються від джерела до приймача по каналах зв’язку. Після передавання повідомлення набувають вигляду, зрозумілого для приймача.

Під час розмови по телефону звукові сигнали (голос) перетворюються (кодуються) на електричні сигнали, які по мережі передаються до співрозмовника і знову перетворюються (декодуються) на звукові сигнали.

Людина постійно отримує, шукає, зберігає, опрацьовує й передає повідомлення. При цьому вона часто застосовує різні пристрої. Використання пристроїв зумовлює необхідність подання повідомлень за до спеціальних знаків.

Код — це система правил для перетворення повідомлень, що містять текст, звук, зображення, жести тощо.Кодування повідомлень — це процес перетворення за певними правилами одного подання набору даних в інший. Під час кодування повідомлення відбувається зміна вигляду повідомлення без зміни його  змісту.

У процесі обміну повідомленнями ми здійснюємо дві операції: кодування та декодування. Перша пов’язана з переходом від вихідної форми подання повідомлення у форму, яка є зручною для збереження, передавання або опрацювання. А друга — зі зворотним переходом до вихідного подання повідомлення. Отже,

Декодування — це перетворення закодованого повідомлення у форму, прийнятну для приймача.

Процес отримання та передавання повідомлень можна зобразити у вигляді схеми

.

// PascalABC.NET 3.0, сборка 1088
const
  n=10; // количество вводимых чмсел
var
  a:array[1..n] of integer;
  i,k,t:integer;
begin
  Writeln('Введите через пробел ',n,' целых чисел');
  k:=0;
  for i:=1 to n do begin
    Read(t);
    if Odd(t) then begin Inc(k); a[k]:=t end
    end;
  if k>0 then begin
    Write('Нечетные числа: ');
    for i:=1 to k do Write(a[i],' ');
    Writeln
    end
  else Writeln('Все введенные числа - четные')
end.

Тестовое решение:
Введите через пробел 10 целых чисел
24 137 -53 46 0 -18 35 2 352 1111
Нечетные числа: 137 -53 35 1111