Найти паскаль. б)среднее арифметическое квадратов всех целых чисел от 100 до b (значение b вводится с клавиатуры ; b> = 100) в) сред. арифм. кв. всех целых чисел от a до 200(значение a и b вводится с клавиатуры; a=< 200) г) сред арифметическое квадратов всех целых чисел от a до ( a и b вводится с клавиатуры; b> =a)

Stas111111112 Stas111111112    3   17.05.2019 15:50    2

Ответы
nikitaerm45nikita nikitaerm45nikita  10.06.2020 20:25

var a,b:integer;
s:real;
Begin
    read(a,b);
    s:=0;
    for i:= a to b do
        s:=s+i*i;
    writeln(s/(b-a+1));
End.

 

общее решение для всех троих

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика