pascal问题 30
本人是个超级大新手,特来请教,我家的电脑是vista的pascal写是能写,但是一堆奇怪的东西,检查起来,也很难,程序检测没问题,但运行的时候就出问题了,另外writel...
本人是个超级大新手,特来请教,我家的电脑是vista的pascal写是能写,但是一堆奇怪的东西,检查起来,也很难,程序检测没问题,但运行的时候就出问题了,另外writeln换行在这里用的对么
有什么可以指正的,都一并提出把,谢谢
program ee;
var
a,b,c,d:integer;
begin
for a:=1 to 10 do
begin
for b:=1 to a do
begin
for c:=1 to b do
if (a=b) or (a=1) then d:=1
else d:=d*a(a-c)/c;
end;
write(d);
end;
writeln;
end. 展开
有什么可以指正的,都一并提出把,谢谢
program ee;
var
a,b,c,d:integer;
begin
for a:=1 to 10 do
begin
for b:=1 to a do
begin
for c:=1 to b do
if (a=b) or (a=1) then d:=1
else d:=d*a(a-c)/c;
end;
write(d);
end;
writeln;
end. 展开
4个回答
意法半导体(中国)投资有限公司
2023-06-12 广告
2023-06-12 广告
单片机,即单片微控制器,也称为单片微型计算机,是将中央处理器(CPU)、存储器(ROM,RAM)、输入/输出接口和其他功能部件集成在一块 在一个小块的集成电路上,从而实现对整个电路或系统的数字式控制。单片机不是完成某一个逻辑功能的芯片,而是...
点击进入详情页
本回答由意法半导体(中国)投资有限公司提供
展开全部
其一,你的程序没有读入。。read。
没有读入你的程序怎么才能输出呢?
其二,你的定义量为整型,但是你又用到了除法,不能整除的话又该怎样办呢? 我建议你还是用DIV 函数吧。。。
其三,你的program ee;中else d:=d*a(a-c)/c;语句中a后面怎么没有运算符?
计算机语言不能够识别省略的东西的。。。。
加油。。
没有读入你的程序怎么才能输出呢?
其二,你的定义量为整型,但是你又用到了除法,不能整除的话又该怎样办呢? 我建议你还是用DIV 函数吧。。。
其三,你的program ee;中else d:=d*a(a-c)/c;语句中a后面怎么没有运算符?
计算机语言不能够识别省略的东西的。。。。
加油。。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
有语法错误
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
Vasta运行PASCAL有乱码,且不稳定,建议你换XP或98适宜下~
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询