ДАЮ
Сообщение на тему программное обеспечение для обработки видео

125

366

Посмотреть ответы 1

Ответы на вопрос:

даналеди

Информатика

4,4(81 оценок)

Var a,d,c,i: integer; begin write('введите первый член арифметической прогрессии: '); readln(a); write('введите разность арифметической прогрессии: '); readln(d); write('введите количество чисел ар.прогрессии: '); readln(c); writeln('ответ'); for i: =1 to с do begin write(a,' '); a: =a+d*(i-1); end; end.