Написать программу, которая вводит с клавиатуры последовательность из 5-ти вещественных чисел и после ввода каждого числа выводит среднее арифметическое полученной части последовательности
На паскале (через for to do)

var a,s:real; i:integer;begins:=0;for i:=1 to 5 do begin readln(a); s:=s+a; writeln(s/i:5:2); end;end.Пример:2.8 2.809.4 6.100.7 4.306.0 4.724.1 4.60