Программа нужна или просто вычислить? Если просто вычислить, то нужно сумму этих чисел разделить на их количество, т.е. 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.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
