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