Var a,b,c,rez:real; begin writeln('Введите число а:'); readln(a); writeln('Введите число b:'); readln(b); writeln('Введите число c:'); readln(c); rez:=(a+b+c)/3; write('Среднее арифметическое :'); writeln(rez); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
