Написать формулы для написания линейных программ Turbo Paskal : Найти сумму 1-ых n-членов арифметической прогрессии, если 2-ой элемент=5 а 4-ый=6
Написать формулы для написания линейных программ Turbo Paskal : Найти сумму 1-ых n-членов арифметической прогрессии, если 2-ой элемент=5 а 4-ый=6
Гость
Ответ(ы) на вопрос:
Гость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.
Не нашли ответ?
Похожие вопросы