题目详情
当前位置:首页 > 职业培训考试
题目详情:
发布时间:2024-07-08 22:41:20

[填空题]

以下程序用来产生20个(0,99)之间的随机整数,并将其中的偶数打印出来。请填空。
Private Sub Command1_Clcik( )
 Randomize
 For I=1 To 20
  X=Int(Rnd*_(1)_)
 If X/2=_(2)_Then Print x
Next I
End Sub

(2)()

更多"以下程序用来产生20个(0,99)之间的随机整数,并将其中的偶数打印出"的相关试题:

[填空题]

以下程序用来产生20个(0,99)之间的随机整数,并将其中的偶数打印出来。请填空。
Private Sub Command1_Clcik( )
 Randomize
 For I=1 To 20
  X=Int(Rnd*_(1)_)
 If X/2=_(2)_Then Print x
Next I
End Sub

(1)()
[填空题]以下程序用来产生20个100以内的随机整数,并将其中的偶数在窗体上显示,请填空。
Randomize
Fori=1 To 20
x= [5]
If x/2= [6] Then
PrintX
End If
Nexti

[填空题]以下程序用来判断指定文件是否能正常打开。请填空。
#include <stdio.h>
main( )
FILE *fp;
if(((fp=fopen("test.txt","r"))==______))
printf("未能打开文件!/n");
else
printf("文件打开成功!/n");

[填空题]以下程序用来输出结构体变量ex所占存储单元的字节数,请填空。
struct st
char name[20]; double score;;
main( )
struct st ex;
printf("ex size:%d/n", sizeof(______));
[填空题]以下程序用来统计文件中字符个数。请填空。
#include "stdio. h"
main( )
FILE *fp;long num=OL;
if((fp=fopen("fname.dat","r")==NULL)
Pirntf("Open error/n"); exit(0);
while( 【16】 )
fgetc(fp);num++;
printf("num=%1d/n",num-1);
fclose(fp);

[填空题]下面程序的功能是:计算1~20之间的奇数之和与偶数之和,请填空使程序功能完整。
#include<stdio.h>
main( )
int a=0,b=0,c=0,i;
for(i=0;i<=20;i+=2)
a+=i;
______;
c+=b;

printf("偶数之和=%d/n",a);
printf("奇数之和=%d/n",c-21);

[填空题]给定年份,下列程序用来判断该年是否是闰年,请填空。   Sub YN( )     Dim X AS Integer     x=Input Box("请输入年号")     If( x Mod 4=0 【 】 x Mod l00< >0) 【 】 (x Mod 400=0)Then       Print"是闰年"     Else       Print"不是闰年,是普通年份"     End If   End Sub
[填空题]下列程序用来判断指定文件是否能正常打开,请填空。
#include<stdio.h>
main( )
FILE*fp;
if(((fp=fopen("test.txt","r")==______))
prinff("文件打开成功!/n");
else
printf("未能打开文件!/n");

[填空题]给定年份,下列程序用来判断该年是否是闰年,请填空。
Sub YN( )
Dim X AS Integer
x=Input Box("请输入年号")
If( x Mod 4=0 【10】 x Mod l00< >0) 【11】 (x Mod 400=0)Then
Print"是闰年"
Else
Print"不是闰年,是普通年份"
End If
End Sub
[填空题]以下程序的功能是,产生10个0~1000的随机整数,放入数组Arr中,然后输出其中的最大值。请填空。
Option Base 1
Private Sub Form_Click( )
  Dim Arr(10)As Integer
  Dim Max As Integer
  Randomize
  For i = 1 To 10
    Arr(i)= Int(Rnd * 1000)
  Next i
  Max = (14)
  For i = 2 To 10
    If (15) Then
      Max = Arr(i)
    End If
  Next i
  Print Max
End Sub

[填空题]下列程序用来计算1+2+…n,当和大于100时停止计算,请填空。
Private Sub Form_Click( )
Dim n as integer,S as integer,I as integer,k as integer
s=0
k=0
n=inputbox(”请输入n的值)
For i=1 to 100
 k=k+1
 s=s+1
______
Next 1
Print s
End Sub

我来回答:

购买搜题卡查看答案
[会员特权] 开通VIP, 查看 全部题目答案
[会员特权] 享免全部广告特权
推荐91天
¥36.8
¥80元
31天
¥20.8
¥40元
365天
¥88.8
¥188元
请选择支付方式
  • 微信支付
  • 支付宝支付
点击支付即表示同意并接受了《购买须知》
立即支付 系统将自动为您注册账号
请使用微信扫码支付

订单号:

截图扫码使用小程序[完全免费查看答案]
请不要关闭本页面,支付完成后请点击【支付完成】按钮
恭喜您,购买搜题卡成功
重要提示:请拍照或截图保存账号密码!
我要搜题网官网:https://www.woyaosouti.com
我已记住账号密码