Mirann
4 год назад
Составить программу в Паскаль: Ученик в первый день выучил Х английских слов. В каждый следующий день он выучивал на К слов больше, чем в предыдущий. Как узнать сколько английских слов он будет знать в N-й день занятий?
ОТВЕТЫ
Radi
Oct 24, 2020
var x,k,n,s,i:integer;
begin
writeln('x, k, n:');
readln(x,k,n);
s:=x;
for i:=2 to n do
begin
x:=x+k;
s:=s+x;
end;
writeln('s = ',s);
end.
Пример:
x, k, n:
10 2 5
s = 70
begin
writeln('x, k, n:');
readln(x,k,n);
s:=x;
for i:=2 to n do
begin
x:=x+k;
s:=s+x;
end;
writeln('s = ',s);
end.
Пример:
x, k, n:
10 2 5
s = 70
548
Смежные вопросы:
