求大神指点
pascal吧
全部回复
仅看楼主
level 1
题目是:
输入要求,程序一运行,屏幕上打印一段话:“Please input a,b,c;",光标在后面闪烁,等待用户输入三个实型数字。
输出要求:
屏幕上输出一句话:”Max=“输入3个数字中最大的那个数
2014年06月01日 03点06分 1
level 12
LZ米看过pascal的语法?
2014年06月01日 04点06分 2
初学= =
2014年06月01日 04点06分
level 12
write('...')不带abc
readln(a,b,c);
if a>b and a>c then...
2014年06月01日 04点06分 3
括号
2014年06月01日 17点06分
level 13
var a,b,c:real;
begin
write('Please input a,b,c:');//冒号是输出的一部分啊
readln(a,b,c);
write('Max=');
if (a>b) and (a>c) then writeln(a:0:5)//两个即以上的比较要加括号;:0:5即保留5为小数,不用可去掉
else if b>c then writeln(b:0:5)//一个比较就不用加
else writeln(c:0:5);
end.
2014年06月01日 04点06分 4
我试试
2014年06月01日 05点06分
能加QQ说么,767185226
2014年06月01日 05点06分
回复 花开花落是菊花 :791125833
2014年06月01日 06点06分
level 1
var a,b,c,max:integer;
begin
write('Please input a,b,c:');
readln(a,b,c);
if a>b then max:=a else max:=b;
if max<c then max:=c;
writeln('Max=',max);
end.
2014年06月03日 11点06分 5
实数啊
2014年06月03日 11点06分
回复 Fallen_Breath :你不会改吗?
2014年06月03日 13点06分
回复 lqq2009 :抒情而已,不要那么计较
2014年06月03日 13点06分
level 11
LZ第一次做题?这是什么鸟蛋语法
2014年06月04日 04点06分 6
1