ПЛИЗЗЗ РЕШИТЕ ЗАДАЧУ ПО ПАСКАЛЬ СМОТРИТЕ УСЛОВИЕ НИЖЕ
ПЛИЗЗЗ РЕШИТЕ ЗАДАЧУ ПО ПАСКАЛЬ
СМОТРИТЕ УСЛОВИЕ НИЖЕ
Гость
Ответ(ы) на вопрос:
Гостьvar
i, a, b, s: integer;
begin
readln(a, b);
s := 0;
for i := a to b do
s := s + i;
writeln((s / (b - a + 1)):0:6);
end.
Не нашли ответ?
Похожие вопросы