[احمداحمداحمد6]

sum=0
count=0
x=inputbox("enter name of student",,)
read(n
for i = 1 to n
w=inputbox("enter subject",,)
next i
read (z
for i = 1 to z
x1=inputbox("enter mark1",,)
x2=inputbox("enter mark2",,)
)sum=sum+(x1+x2
count=count+1
next i
avr=sum/count
data1.feild1=avr
data1.feild2=name

...................................,
bye