unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Edit1: TEdit;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var
i : Integer;
begin
i := StrToInt(Edit1.Text);
case i of
0 : Caption := '是0';
1..5 : Caption := '小于等于5';
6..9 : Caption := '大于5小于10';
10..99 : Caption := '大于等于10小于100';
else
Caption := '大于等于100';
end;
end;
end.
分享到:
相关推荐
python 输入一个正整数判断它是不是素数 示例
输入一个正整数,判断是不是素数(C++) 设和和我一样的初学者看。
纯属个人设计如有雷同实属巧合希望大家踊跃下载谢谢各位了
从键盘输入一个整数,判断能否同时被2和3整除。 欢迎大佬指教
判断输入的正整数是不是回文数 回文数是指将一个正整数从左往右排列和从右往左排列值一样的数
这个代码主要是写有关输入一串数字之后,判断这串数字中的正数、负数和0,供大家下载,谢谢
在大于1的整数中,除了1和该数自身外,无法被其他整数整除的数。大于1的数若不为素数,则被称为合数,也叫作合成数。 素数的特点 大于2的质数只能是奇数。(不能说大于2的奇数都是质数。) 大于5的质数,个位数只能是1...
C#判断是否为整数,正则表达式判断,简单效率高,比用try更快
编写一个java应用程序。用户从键盘输入一个1-9999之间的...1)程序具有判断用户的输入是否为合法整数的功能。对非法输入(例如含有字母)要进行处理。 2)要判断输入数的位数,并输出相关信息。 3)要判断是否回文数。
一个简单而易懂的判断一个数是否为素数的java代码
delphi 判断字符串是否为整数,输入一个任意的数,包括小数等,程序将为您判断出用户输入的是否是整数,程序功能比较单一,仅此而已,是一本书中的例子。
printf("题目:输入一个数判断是否是5与7的倍数同时判断这个倍数是偶数倍还是奇数倍"); printf("请输入一个数值:"); scanf("%d",&a); if(a%5==0 && a%7==0 )//判断是否是5与7的倍数 是 {...
判断一个整数是否是素数
主要介绍了详解Java判断是否是整数,小数或实数的正则表达式,非常具有实用价值,需要的朋友可以参考下。
JAVA中判断一个整数是否为质数, 有空可以看看.
包含了常用正则表达式的使用,验证,正则表达式替换字符串,判断字符串是否为正整数,判断输入的字符串是否全是英文、中文....
判断一个正整数m是否为素数,只要判断m可否被2~根号m之中的任何一个正整数整除,如果m不能被此范围中任何一个正整数整除,m即为素数,否则m为合数。 方法一:(利用for循环和break语句) import math m = int(input...
从控制台输入一串字符串,输出时,只输出其中的整数。
判断是否整数de 代码初学者看的东方的
根据输入的三条边能够判定是否为三角形,并且输出三角形的类型,如等腰三角形,直角三角形,等边三角形、一般三角形等等,同时绘制出三角形的形状。