求助 判断三个整数是否相邻
pascal吧
全部回复
仅看楼主
level 5
wyc0327 楼主
判断三个整数是否相邻
时间限制:1000MS   内存限制:1000K
解答次数:1492   通过次数:544
【试题描述】
判断三个整数是否相邻,是输出"TRUE",否则输出"FALSE"。
【输入描述】
输入只有一行,包括3个整数。
【输出描述】
输出只有一行。
【输入样例】
1 2 3
【输出样例】
TRUE
【试题来源】

2010年05月26日 08点05分 1
level 7
基础的判断条件。
2010年05月26日 08点05分 2
level 5
数据范围
2010年05月26日 09点05分 3
level 1
解答次数和通过次数是怎么统计出来的?
我觉得即使早些年的比较老的计算机,用1M内存1秒钟时间也足够了。
2010年05月26日 10点05分 5
level 5
…神牛…果然基础…我都会…
2010年05月27日 05点05分 6
level 5
回复:6楼
膜拜神牛!
2010年05月27日 05点05分 7
level 2
lz
好懒啊,只会要标程
自己想!
2010年06月06日 11点06分 8
level 5
var
a:array[1..1000]of longint;
s,q:integer;
begin
for i:=1 to 1000 do
    a[i]:=0;
for q:=1 to 3 do
    begin
      read(s);
      a[s]:=1;
    end;
for i:=1 to 1000 do
    if (a[i]=1)and(a[i+1]=1)and(a[i+2]=1)
      then begin write('true'); halt; end
    else begin write('false'); halt; end;
end.
基础题目练手感
2010年06月06日 11点06分 9
level 1
xiexie
2010年06月14日 00点06分 10
level 4
var
a:array [1..3] of integer;
i,m:integer;
begin
for i:=1 to 3 do
read(a[i]);
i:=1
while i<=2 do
begin
if a[i]>a[i+1] then begin 交换a[i]和 a[i+1] end;
计数器加1
end;
i:=3
if (a[2]-a[1]=1) and (a[3]-a[2]=1) then write('true')
end.
2010年06月15日 14点06分 11
level 5
6l
膜拜大牛攒RP
2010年06月16日 15点06分 12
level 5
我们来非递归记忆化深度优先搜索结合滚动数组动态规划基于SBT和平衡二叉树的高精度堆排来做
2010年06月18日 12点06分 14
level 1
排序 +判断。。。
2010年09月22日 05点09分 17
level 5
wyc0327 楼主
回复:10楼
注意了,十楼的小子,你侵犯了我的名字
2010年10月07日 00点10分 18
level 1
#include<stdio.h>
#include<math.h>
int main()
{
int a,b,c,d,e;
scanf("%d %d %d",&a,&b,&c);
d=a-b;
e=b-c;
if(abs(d)==1)
{
if(abs(e)==1)
{
printf("TRUE");
}
else
printf("FALSE");
}
else
printf("FALSE");
}
2015年11月05日 04点11分 19
level 3
其实很简单
program xxx ;
var a,b,c:longint;
begin
read(a,b,c);
if (a+b+c=3*a) then writeln('TRUE')
else
if (a+b+c=3*b) then writeln('TRUE')
else
if (a+b+c=3*c) then writeln('TRUE')
else writeln('FALSE')
end.
end.
这个程序,输入3个打乱顺序的相邻数,照样可以出正确结果。
2015年11月06日 11点11分 20
1