Счётчик = 2;
член_ряда = 1;
сумма = 1;
ввод n;
ввод x;
пока (счётчик <= n)
{
член_ряда = 1/(счётчик*x);
cумма = сумма + член ряда;
счётчик = счётчик + 1;
}
вывод суммы;
Алгоритм не проверял, так что проверь.
<span>var
i:integer;
begin
i:=2;
while i<=100 do
begin
write (i,' ');
i:=i+2;
end;
end.</span>
Price_one = float(input())
for i in range(1,11):
print('{0:.3f} кг. стоит - {1:.2f}'.format(i/10,price_one*(i/10)))
Пример:
<span>0.100 кг. стоит - 2.55
0.200 кг. стоит - 5.10
0.300 кг. стоит - 7.65
0.400 кг. стоит - 10.20
0.500 кг. стоит - 12.75
0.600 кг. стоит - 15.30
0.700 кг. стоит - 17.85
0.800 кг. стоит - 20.40
0.900 кг. стоит - 22.95
1.000 кг. стоит - 25.50</span>
Program n1;
const n=10;
var a: array [1..n] of integer;
i,sum,k: integer;
begin
randomize;
for i:=1 to n do
begin
a[i]:=random(34);
write(a[i],' ');
end;
writeln;
sum:=0;
k:=0;
for i:=1 to n do if a[i] mod 3 = 0 then
begin
k:=k+1;
sum:=sum +a[i];
end;
writeln('кол-во: ',k);
writeln('сумма: ',sum);
writeln('ср. арифм: ',sum/k);
end.
Paint
<span>который входит в состав MS Windows</span>