какие сможете решите пожалуйста Вычислить сумму чисел: S=К+(К+1)+(К+2)+(К+3)++(К+N);
Какие можете решите пожалуйста
Вычислить сумму чисел: S=К+(К+1)+(К+2)+(К+3)++(К+N); (Nlt;N).
Вычислить среднее арифметическое чисел K,K+1,K+2,,K+N; (Klt;N).
Вычислить творенье чисел: P=N*(N+1)*(N+2)*(N+3)**(N+R); (Nlt;R).
Вычислить: P=1+(1*2)+(1*2*3)+(1*2*3**R).
Вычислить: P=1*(1+2)*(1+2+3)*(1+2+3++R).
Отыскать значения функции M=N2-N при N=2,4,6,,T (T-четное).
Отыскать значения функции X=Y2 *(Y2 -Y)/Y при Y=N*1,N*2,,N*M (Nlt;M).
Берлюта
Виолетта
Паскаль
1 ответ
Артём Синай
var k,n,i,s:integer;
begin
readln(k,n);
for i:=0 to n do s:=s+k+i;
writeln(s)
end.
var k,n,i,s:integer;
begin
readln(k,n);
for i:=0 to n do s:=s+k+i;
writeln(s/(n+1))
end.
var r,n,i,p:integer;
begin
readln(r,n);
p:=1;
for i:=0 to r do p:=p*(n+i);
writeln(p)
end.
var r,i,p,x:integer;
begin
readln(r);
x:=1;
for i:=1 to r do
begin
x:=x*i;
p:=p+x;
end;
writeln(p)
end.
var r,i,p,x:integer;
begin
readln(r);
p:=1;
for i:=1 to r do
begin
x:=x+i;
p:=p*x;
end;
writeln(p)
end.
var m,n,t,i:integer;
begin
readln(t);
writeln('N':3,'M':5);
for i:=1 to (t div 2) do
begin
n:=i*2;
m:=sqr(n)-n;
writeln(n:3,m:5);
end;
end.
var
y,m,n,i:integer;
x:real;
begin
readln(n,m);
writeln('Y':3,'X':10);
for i:=1 to m do
begin
y:=n*i;
x:=sqr(y)*(sqr(y)-y)/y;
writeln(y:3,x:10);
end;
end.
begin
readln(k,n);
for i:=0 to n do s:=s+k+i;
writeln(s)
end.
var k,n,i,s:integer;
begin
readln(k,n);
for i:=0 to n do s:=s+k+i;
writeln(s/(n+1))
end.
var r,n,i,p:integer;
begin
readln(r,n);
p:=1;
for i:=0 to r do p:=p*(n+i);
writeln(p)
end.
var r,i,p,x:integer;
begin
readln(r);
x:=1;
for i:=1 to r do
begin
x:=x*i;
p:=p+x;
end;
writeln(p)
end.
var r,i,p,x:integer;
begin
readln(r);
p:=1;
for i:=1 to r do
begin
x:=x+i;
p:=p*x;
end;
writeln(p)
end.
var m,n,t,i:integer;
begin
readln(t);
writeln('N':3,'M':5);
for i:=1 to (t div 2) do
begin
n:=i*2;
m:=sqr(n)-n;
writeln(n:3,m:5);
end;
end.
var
y,m,n,i:integer;
x:real;
begin
readln(n,m);
writeln('Y':3,'X':10);
for i:=1 to m do
begin
y:=n*i;
x:=sqr(y)*(sqr(y)-y)/y;
writeln(y:3,x:10);
end;
end.
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Игорь 14 лет назад был на 8 лет моложе, чем его
Математика.
Два тела массами m1 и m2 находящие на расстоянии R друг
Физика.
В сосуде 4целых одна пятая литр воды что бы заполнить сосуд
Математика.
Двум малярам Диме И Олегу поручили выкрасить фасад дома они разделили
Разные вопросы.
найти порядковый номер 41Э если в ядре 20 нейтронов
Разные вопросы.
в ряду натуральных чисел 3, 8, 10, 24, … 18 одно
Математика.
Предприятие по производству с/хоз продукции на производство затратило 3527000 руб Валовый
Разные вопросы.
Математика, задано на каникулы. ВАРИАНТ 1004
НОМЕР 1,2,3,4,5,6,7,8.
Математика.
Имеются три конденсатора емкостью С1=1мкФ, С2=2мкФ и С3=3мкФ. Какую наименьшую емкость
Физика.
Из точки м выходят 3 луча MP MN и MK причём
Геометрия.
Облако тегов