• Результат исполнения программы число 100, нужно найти какое число ввели

    var a: array [1...8] of integer;
    i, sun: integer;
    begin
    ReadIn (a[1]);
    sum:=0;
    for i :=2 to 8 do
    a[i] := a[i-1]+3;
    for i:=8 downto 1 do
    sum:= sum + a[i];
    writeln(sum);
    end.

Ответы 3

  • 2______________?
    • Автор:

      cohen9
    • 6 лет назад
    • 0
  • 2. Просто ответ не может быть меньше 20 символов, вот я и добавил __
    • Автор:

      pace
    • 6 лет назад
    • 0
  • Есть массив из 8 элементов. Вводится одно число - первый элемент массива. Далее расчитываются остальные элементы массива, каждый из которых больше предыдущего на 3. Так получается арифметическая прогрессия с шагом 3, с 8 элементами, неизвестным первым числом и суммой 100. Далее берем формулу суммы ариф.пр. S=n(a1+an)/2=n(2a1+d(n-1))/2 выражаем а1=(2S/n-d(n-1))/2, подставляем и получаем (2*100/8 - 3(8-1))/2=2. Ответ:2
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years