1. Да се състави алгоритъм и напише програма, която определя средния успех на един клас от 26 ученика, на базата на списък от средните им успехи.

repeat
write ('A=');
readln (A)
until (A<0);
S:=0
while A<>0 do
begin
S:=S+SQR(A);
write ('A=')
readln (A)
end;


2. Да се определи S=?, ако въведените стойности от клавиатурата на А са: 1,2,-3,10,2,0



Моля някой да ги реши и да напише обясненията, че нищо не разбирам :(
Благодаря предварително!

За първата задача само трябва да пресметнеш средно аритметичното на средните успехи на всички от класа (събираш успехите на всички и ги делиш на 26). Въвеждането на резултатите (и пресмятането) може да се направи с цикъл защото е досадно 26 пъти да се пише readln за всеки ученик. Забравил съм синтаксиса на функциите и няма да мога да ти напиша задачата...именно заради това ме е страх, че мога да те объркам и на 2-та задача...Дано с това съм ти помогнал. А няма ли да учите нещо друго освен Паскал?!