помогите чем можете

p>y := y + 5*i;

Writeln(y);

End.

модем? 4.При каких способах подключения к сети интернета модем ненужен?

2. Массив из 6 отрицательных и положительных целых чисел вводится в области описания констант. Найти сумму положительных элементов массива.
3. Массив из 5 целых чисел вводится с клавиатуры в строку. Найти сумму элементов массива, стоящих на чётных позициях. Вывести исходный массив и полученную сумму.
4. Массив из 40 целых чисел из промежутка [10,90] задается с помощью генератора случайных чисел. Найти сумму элементов массива, кратных n . Вывести исходный массив и полученную сумму.
Помогите кто в чем может.

Петя,Ваня и Саша учатся в одной начальной школе, но в разных классах. Петя перешёл в тот класс, в котором в прошлом году учился Саша. Через год Ваня перейдёт в тот класс,который в этом году закончит Петя. В каком классе учится каждый из мальчиков?
В таблице нужно поставить плюся и минусы.
Помогите пожалуйста, кто чем может!

такого: var a,b,c:(integer)-целые; l,k,n:(real)-вещественные), найти сумму первых двух чисел, частное второго и третьего числа и утроить сумму трёх чисел. мне нужно составить программу дальше я знаю только начало: program ur1; var a,b,c:integer; l,k,n:real; begin и всё я дальше не могу сделать, помогите полажуйста чем можете!