Предмет: Информатика,
автор: mariyachurilova
Написать формулы для написания линейных программ Turbo Paskal : Найти сумму 1-ых n-членов арифметической прогрессии, если 2-ой элемент=5 а 4-ый=6
Ответы
Автор ответа:
0
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.
Интересные вопросы
Предмет: Химия,
автор: Аноним
Предмет: Английский язык,
автор: Чебурашка1977
Предмет: История,
автор: Ainurabdrahmanova
Предмет: Математика,
автор: лиза19991811
Предмет: Алгебра,
автор: gelt