Question

Даны три числа. Найти среднее арифметическое этих чисел. напишите програмный код

Answer 1

Программа нужна или просто вычислить? Если просто вычислить, то нужно сумму этих чисел разделить на их количество, т.е. 3 Program sr; Var a,b,c,rez:real; Begin Writeln('vvedi a,b,c '); Readln(a,b,c); Rez:=(a+b+c)/3; Writeln('rez=', rez); Readln; End.

Answer 2

программа

Answer 3

Program srar;

Answer 4

Блин. Сейчас напишу

Answer 5

просто код нужен var и дальше

Answer 6

Отредактировала ответ