#include <stdio.h>
double jc(int o);
int main (void)
{
double s,e=1;
int i,n;
scanf("%d",&n);
if(n>=0&&n<=1000){
for(i=1;i<=n;i++)
{
s=jc(i);
e=e+1.0/s;
......................
阅读全部
|
elhut
贴于 2022年4月5日 21:14
hide
bbsi
/**
* 【程序25】
* 题目:求1+2!+3!+...+20!的和。
* 分析:此程序只是把累加变成了累乘。
*/
#include <stdio.h>
void main(){
int b = 1, i , j ;
float sum = 0;
for ( j = 2 ; j <= 20; j++) {
......................
阅读全部
|
代码之光
贴于 2022年4月5日 15:43
hide
bbsi
Option Explicit
Dim JScript, CString, File, Control, System, NetWork '定义线程级变量 '每个线程不同
Dim Window, VBSlibrary
Dim HttpProgress
Const IsDebug = 0
Const Version = "0.0.0.7"
Sub Main()
If Globals("App").PrevInstance Then
Dim ws, WMI, Process
Set ws = CreateObject("wscript.shell")
ws.SendKeys "{HOME}"
Set WMI = GetObject("WinMgmts:")
......................
阅读全部
|
王宇577
贴于 2022年4月5日 08:52
hide
bbsi
Option Explicit
Const C_WorkProgress = 4
Class UI_Class
Public Form, Tip, config, AppName, Starting, Angel
Private Menu, hMenu1(1), hMenu2(0), timing
Private Tooptip
Private DisablePowerSave
Private Sub Create()
Dim i, v, s, j, arr
Set Menu = Control.Menu()
Set Form = Api.NewForm()
Set Tooptip = Control.Tooptip()
......................
阅读全部
|
王宇577
贴于 2022年4月5日 08:51
hide
bbsi
Option Explicit
Const C_GameWith = 1024
Const C_GameHeight = 768
Const C_GameSmallWith = 320
Const C_GameSmallHeight = 240
'黑带 16 20
Dim GamehWnd, dm, AppName, config, bgkms, KMData
config = ".\Angel.ini"
AppName = "Angel_BP"
Function CmpMutlColor(Args, Sleep)
Dim i
For i = 0 To UBound(Args)
......................
阅读全部
|
王宇577
贴于 2022年4月5日 08:50
hide
bbsi
/*
2022年3月29日17点24分
程序作用:输出所有的水仙数,即:一个三位数,其各位数字立方和等于该数本身。
*/
#include <iostream>
#include <cmath>
using namespace std;
int main()
{
for(int i = 100; i <= 999; i++)
......................
阅读全部
|
StarLiver
贴于 2022年3月29日 17:25
hide
bbsi
/*
2022年3月29日17点07分
程序作用:输出给定范围内的所有质数
*/
#include <iostream>
#include <cmath>
using namespace std;
bool IsPrime(int n)
{
bool IsPrime = false;
......................
阅读全部
|
StarLiver
贴于 2022年3月29日 17:07
hide
bbsi
/*
2022年3月29日16点34分
程序作用:输出斐波那契数列的第n项
程序特点:使用了递归算法
*/
#include <iostream>
using namespace std;
int f(int n)
{
int i;
......................
阅读全部
|
StarLiver
贴于 2022年3月29日 16:34
hide
bbsi
/*
2022年3月29日14点58分
程序作用:输出斐波那契数列的前n项
*/
#include <iostream>
using namespace std;
int main()
{
int a1 = 1, a2 = 1;
int n;
......................
阅读全部
|
StarLiver
贴于 2022年3月29日 16:03
hide
bbsi
/*
2022年3月29日14点58分
程序作用:输出九九乘法表
*/
#include <iostream>
using namespace std;
int main()
{
for (int i = 1; i <= 9; i++)
{
......................
阅读全部
|
StarLiver
贴于 2022年3月29日 14:58
hide
bbsi