• Написать формулы для написания линейных программ Turbo Paskal : Найти сумму 1-ых n-членов арифметической прогрессии, если 2-ой элемент=5 а 4-ый=6

Ответы 1

  • const a1=4.5; d=0.5;

    var S:real; n:integer;

    begin

    readln(n);

    S:=(2*a1*n+d*n*(n-1))/(2);

    writeln(S);

    end.

  • Добавить свой ответ

Войти через Google

или

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

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

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