77

На отрезке от a до b найти среднее арифметическое всех чисел, включая концы…

07 марта 2023

На отрезке от a до b найти среднее арифметическое всех чисел, включая концы отрезка (решить на TurboPascal)

категория: информатика

40

program sdss; uses crt; var a,b,i: integer; c: real; beginclrscr; readln (a,b); for i: =a to b do c: c+i; c: =c/ (b-a+1); writeln (c: 2:4); readkey; end.

Знаете ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...