ИНФОРМАТИКЕ Написать программу
"Найти среднее арифметическое трёх чисел введенных с клавиатуры"
XX= a+b+c/3
Program sr_arifm
Var a,b,c,x:real
Begin
Writeln('Введите три числа')
Readln(a,b,c)
x:=???
Writeln('Среднее арифметическое=', x)
end.