Информатика, опубликовано 2018-08-22 18:57:07 by Гость
Паскаль. Составьте программу вычисления суммы 150 первых членов арифметической прогрессии, если a1 = –200; d = 0,2.( с помощью repeat)
Ответ оставил Гость
Program prg;
const
n = 150;
a1 = -200;
d = 0.2;
var
c : integer;
an : double;
begin
c := 1;
repeat
an := a1 + (c-1) * d;
write(an:5:2, , );
inc(c);
until c=n;
writeln;
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на