作业帮 > 综合 > 作业

编一个随机产生一个100以内的四则运算题,要求先输出这个四则运算的式子,这个四则

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/15 02:45:11
编一个随机产生一个100以内的四则运算题,要求先输出这个四则运算的式子,这个四则
用free Pascal
program lx;
var
n:integer;
begin
randomize;
n:=random(3);
if n=0 then
writeln(random(100),'+',random(100),'-',random(100),'*',random(100),'/',random(100));
if n=1 then
writeln(random(100),'*',random(100),'+',random(100),'-',random(100),'/',random(100));
if n=2 then
writeln(random(100),'/',random(100),'-',random(100),'*',random(100),'+',random(100));
if n=3 then
writeln(random(100),'-',random(100),'/',random(100),'+',random(100),'*',random(100));
end.
可以看下这个程序.