Напишите в паскале программу на нахождение суммы чисел арифметической прогрессии с 50 по 150 член, если a1=1, d=0,6. формула арифметической прогрессии sn=(a1+an)*n/2. нужно. заранее .

D102006 D102006    3   24.08.2019 16:30    4

Ответы
DDddd532222 DDddd532222  09.09.2020 01:54
Var
a1,d:real;
Begin
Write('a1 = ');ReadLn(a1);
Write('d = ');ReadLn(d);
WriteLn('S(150) - S(50) = ',(2*a1+d*149)*75-(2*a1+d*49)*25);
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика