profile
Опубликовано 5 лет назад по предмету Информатика от Аккаунт удален

ПЛИЗЗЗ РЕШИТЕ ЗАДАЧУ ПО ПАСКАЛЬ
СМОТРИТЕ УСЛОВИЕ НИЖЕ

  1. Ответ
    Ответ дан Aillianna
    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.
Самые новые вопросы