Private Sub Form 1_Load()
Print "New balance,New Life "
End Sub

#include <iostream>
#include <cstdio>

using namespace std;

int main()
{
    int n, m;
    while(scanf("%d %d", &n, &m) != EOF)
    {
        int temp = 0, s = 0, k = 0;
        int arr[50] = {0}, brr[50] = {0};
......................

#include <stdio.h>
#include <stdlib.h>

int main()
{
    int digit_seen[10] = {0}, a[10] = {0};
    int digit, b = 0;
    long int n;

    printf("请输入数字：");
    scanf("%ld", &n);

......................

#include<iostream> 
#include<string>
#include<cstring>
#include<cstdlib>
using namespace std;
void strcopy(string string1,string string2);
void writefile(string string3); 
int main(){
string string1;
string string2;
cout<<"enter the 1st string\n";
cin>>string1;
......................

// 打飞机.cpp : Defines the entry point for the console application.
//
#include<iostream>  
#include<windows.h>  
#include<conio.h>  
#include<time.h>  
#include<string>  
using namespace std;  
  
/*=============== all the structures ===============*/  
  
typedef struct Frame  
......................

/*1002 写出这个数 (20)（20 分）
读入一个自然数n，计算其各位数字之和，用汉语拼音写出和的每一位数字。

输入格式：每个测试输入包含1个测试用例，即给出自然数n的值。这里保证n小于10^100^。

输出格式：在一行内输出n的各位数字之和的每一位，拼音数字间有1 空格，但一行中最后一个拼音数字后没有空格。

输入样例：

1234567890987654321123456789
输出样例：

......................

#include<stdlib.h>
#include<stdlib.h>
void main()
{
int X[2][5]={{1,2,3,4,5},
{6,7,8,9,10}};
//定义数组指针用于指向二维数组X
int(*pxElement)[5]=X;
int m=0;
int n=0;
printf(“二维数组元素如下：\n”）
for(m=0;m<2;m++)
......................

#include <stdio.h>
int main()
{
    int a[]= {45,32,12,55,67};
    int b[]= {22,32,87,90};
    int i,j;
    for(i=0; i<sizeof(a)/sizeof(int); i++)
        for(j=0; j<sizeof(a)/sizeof(int); j++)
            printf("%d*%d=%d\n",a[i],b[j],a[i]*b[j]);
    return 0;
}

Dim Rs As Integer, R0 As Integer, La As Integer, Lb As Integer, Lc As Double, Rb As Double, Z As Double
Rs = 9: R0 = 16: La = 22: Lb = 38: Lc = 38.992: Rb = 16.5: Z = -0.781
Const Pi = 3.1415926
Const Hmax = 8.78 / (13.5 ^ 2 / 2 / 8.5 ^ 2)

Dim W0 As Double, B0 As Double, Bd As Double, Wd As Double, Rd As Double, Kd As Double, Ymax As Double
W0 = Pi / 2 - Atn(((La ^ 2 + Lc ^ 2 - (R0 + Rs) ^ 2) / (2 * La * Lc)) / Sqr(1 - ((La ^ 2 + Lc ^ 2 - (R0 + Rs) ^ 2) / (2 * La * Lc)) ^ 2))
B0 = Atn(((Rb + Z) / Lb) / Sqr(1 - ((Rb + Z) / Lb) ^ 2))
Bd = Atn(((Rb + Z - Hmax) / Lb) / Sqr(1 - ((Rb + Z - Hmax) / Lb) ^ 2))
Wd = W0 + (B0 - Bd)
Rd = Sqr(La ^ 2 + Lc ^ 2 - 2 * La * Lc * Cos(Wd))
Kd = Pi / 2 - Atn(((Rd ^ 2 + Lc ^ 2 - La ^ 2) / (2 * Rd * Lc)) / Sqr(1 - ((Rd ^ 2 + Lc ^ 2 - La ^ 2) / (2 * Rd * Lc)) ^ 2))
......................

Private Sub Form 1_Load()
Print "New balance,New Life "
End Sub