№1 найдите среднее арифметическое всех целых чисел - вопрос №39221551 от FannyPanda 15.01.2023 11:36

Question

Информатика: №1 найдите среднее арифметическое всех целых чисел от a до b( значения a и b вводятся с клавиатуры)

FannyPanda · Answer

Var x, a, i, b:integer;BeginX:=0;Readln(a,b);For i:= a to b do x:=x+i;Write(x/b);End....