Предмет: Информатика,
автор: Нюшка2002
Pascal
Напиши программу, которая выводит на экран (в одну строку через пробел) элементы арифметической прогрессии с a1=0, d=7, an=98
Программа должна выдать такой ответ: 0 7 14 21 28 35 42 49 56 63 70 77 84 91 98
Ответы
Автор ответа:
1
Ответ:
program progress;
var a1,d,an,i,a:integer;
begin
a1 := 0;
d := 7;
an := 98;
i := 2;
write(a1,' ');
while(a < an) do
begin
a := a1 + d * (i-1);
inc(i);
write(a,' ');
end;
end.
Объяснение:
Так?
Нюшка2002:
СПАСИБО!!!
Похожие вопросы
Предмет: Математика,
автор: zeli01a
Предмет: Немецкий язык,
автор: goovila9
Предмет: Математика,
автор: bvolinets
Предмет: Математика,
автор: FriskАндертейл