var marks : real
var total : real:=0
var average : real

put "Enter ten marks and I will total them up and find the total and the average.."
for i: 1..10
get marks
total := total + marks 
end for
put "The total of the marks is ",total
put "The average of the marks is ",round(total/10)