用FREE PASCAL编程 2011年长沙市小学生信息学奥林匹克竞赛决赛试题1.购买文具“六一”儿童节“文具套装”优惠销售,三种购买方式如下:1、现购:10元/套,超过2套以外的,9元/套,超过10套以外的

来源:学生作业帮助网 编辑:六六作业网 时间:2024/05/05 11:15:29
用FREEPASCAL编程2011年长沙市小学生信息学奥林匹克竞赛决赛试题1.购买文具“六一”儿童节“文具套装”优惠销售,三种购买方式如下:1、现购:10元/套,超过2套以外的,9元/套,超过10套以

用FREE PASCAL编程 2011年长沙市小学生信息学奥林匹克竞赛决赛试题1.购买文具“六一”儿童节“文具套装”优惠销售,三种购买方式如下:1、现购:10元/套,超过2套以外的,9元/套,超过10套以外的
用FREE PASCAL编程 2011年长沙市小学生信息学奥林匹克竞赛决赛试题
1.购买文具
“六一”儿童节“文具套装”优惠销售,三种购买方式如下:
1、现购:10元/套,超过2套以外的,9元/套,超过10套以外的,则7.5元/套;
2、网购:9元/套,超过10套,全部打8折;超过50套,则全部打六折
3、团购:10套起团购,6元/套,达到或超过50套,则5元/套,达到或超过100套,则4元/套.
小明想用其中一种方式购n套文具,请你帮他计算应付多少元钱?、
[输入]购买方式号(1、 2、 3)套数n(n

用FREE PASCAL编程 2011年长沙市小学生信息学奥林匹克竞赛决赛试题1.购买文具“六一”儿童节“文具套装”优惠销售,三种购买方式如下:1、现购:10元/套,超过2套以外的,9元/套,超过10套以外的
program dd;
var a,b:longint;
c:real;
begin
readln(a,b);
if a=1 then
if b

用free pascal编程:输入两个数,求他们的最大公因数和最小公倍数 Free Pascal 和Pascal的区别?为什么竞赛都用Free Pascal?Free Pascal 和Pascal的区别?为什么竞赛都用Free Pascal? pascal语言编程问题(free pascal求1—N中的素数的个数.(1 用pascal语言编程:输出n(n 用free pascal编程有15根火柴,如果规定每次取2根或3根,那么取完这堆火柴共有多少种不同取法? free pascal常见语句 求几道 初学 free pascal free pascal 黑洞6174 用free pascal编一个程序,如下用free pascal 编程 Description 果园里种了很多桃树,当桃树开始结果的时候,猴子便会成群结队地前来摘桃.猴子们第一天会摘掉桃子的一半还多一个,第二天再摘第一天 查一下错Free Pascal: 有一个三位数,它的各位数字之和的11倍恰好等于它自身,请编程求出这个三位数.我用Free Pascal做的,就是不能运行,帮忙查一下错:var a,b,c,s:integer;begin for s:=100 to 999 do begin 用FREE PASCAL编程 2011年长沙市小学生信息学奥林匹克竞赛决赛试题1.购买文具“六一”儿童节“文具套装”优惠销售,三种购买方式如下:1、现购:10元/套,超过2套以外的,9元/套,超过10套以外的 free pascal怎样产生随机数 pascal 编程输入下列图案 Free pascal 求连续数字的平方和Description 编程求1平方+2平方+...+n平方 Input 输入一行,只有一个整数n(1 编程设计 鸡兔同笼问题 free pascal 初学入门鸡兔共有30个头,90支脚,问鸡兔分别有几只? 用FREE PASCAL 做一个程序‘判断数是否是三位数’ free pascal In(n)与log(n) 怎么表达?可以用函数. free pascal语言.打印下列图形(共4个).用循环.88888888881121123211234321#空空空空@#空空@@###@@@