#1

var mark:int
var sum:int:=0
var counter : int := 0
var stop:int

put "How many marks would you like to have averaged?"
get stop
put "Enter marks"
for count: 1..stop
put count
get mark
sum:=sum+mark
end for

put "Average is ", round (sum/stop)



#2
for decreasing count:5..1
put" ", count..
end for