На отрезке от a до b найти среднее арифметическое всех чисел, включая концы отрезка(решить на Turbo Pascal)
На отрезке от a до b найти среднее арифметическое всех чисел, включая концы отрезка(решить на Turbo Pascal)
Гость
Ответ(ы) на вопрос:
Гостьprogram sdss; uses crt; var a,b,i:integer; c:real; begin clrscr; readln(a,b); for i:=a to b do c:c+i; c:=c/(b-a+1); writeln(c:2:4); readkey; end.
Не нашли ответ?
Похожие вопросы