Найти паскаль. б)среднее арифметическое квадратов - вопрос №1414072100 от Evgenia111111111111 14.04.2023 18:37

Question

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

Evgenia111111111111 · Answer

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.   общее решение для всех троих...