Контрольная по информатике...))) - VB

Формулировка задачи:

Помогите решить контрольную по информатике - программирование в Визуал Бейсике... Сестра сосвсем замучила... задачи в приложении))) Плиииииииииииииииииииззз!Задачи по программированию..doc

Решение задачи: «Контрольная по информатике...)))»

textual
                            Листинг программы 
                        

                            i=inputbox("I=")
n=inputbox("N=")
s=0
for j=1 to n
if j<>i then s=s+a(j)
next j
s=s/(n-1)
msgbox s
                        