Решите задачу, используя язык программирования Паскаль: Даны три действительных положительных числа. Найти среднее арифметическое этих чисел.
ПЛИЗ до завтра надо

program zadacha;var a,b,c,s:REAL;beginwriteln('Enter a,b,c:');readln(a);readln(b);readln(c);s:=0;s=(a+b+c)/3;writeln('Среднее арифметическое', s);end.