noip普及组初赛写运行结果+完善程序9(附答案)
更新时间:2024-01-12 15:31:01 阅读量: 教育文库 文档下载
写出下列程序运行结果
1.var
i,a,b,c,d:integer;
f:array[0..3] of integer; begin
for i:=0 to 3 do read(f[i]);
a := f[0] + f[1] + f[2] + f[3]; a := a div f[0];
b := f[0] + f[2] + f[3]; b := b div a;
c := (b * f[1] + a) div f[2]; d := f[(b div c) mod 4];
if (f[(a + b + c + d) mod 4] > f[2]) then begin
a := a + b; writeln(a); end else begin
c := c + d; writeln(c); end; end.
输入30 20 10 5 输出74
2.VAR a:ARRAY [1..4] OF Char; C,Ch :Char; BEGIN
FOR Ch:='W' TO 'Z' DO a[Ord(Ch)-Ord('W')+1]:=Ch; FOR Ch:='W' TO 'Z' DO BEGIN
FOR C:=Ch TO 'Z' DO Write(a[Ord(C)一Ord('W')+1];
Writeln END
END.
输出 WXYZ XYZ YZ Z 3.VAR
a, b:Integer;
PROCEDURE P(C:Integer:VAR d:Integer); BEGIN C:=a+b; d:=a-b; END; BEGIN
a:=1; b:=2; P(a,b);
Writeln(a:3,b:3)
END. 输出 1 -1 4.type
TT= array[0..20]of integer; procedure func(var ary:TT; n:integer); var
i,j,x:integer; begin
i:=0;j:=n-1; while i while (i a:TT; i,m:integer; begin m:=10; for i:=0 to m-1 do read(a[i]); func(a,m); for i:=0 to m-1 do write(a[i], ' '); writeln; end. 输入:5 4 -6 -11 6 -59 22 -6 1 10 输出:_5 4 10 1 6 22 -59 -6 -11 -6___ 完善程序: 当输入一个给定的数后,能输出所有不超过n的、其平方由左右对称的数字组成的数。例如:n=23,则输出:1,2,3,11,22。它们的平方依次是:1,4,9,121,484,都是左右对称的数字组成的数。 const max=1000; var m,n,i,j,s:longint; d:array[0..max] of byte; begin write('Please input a number: '); readln(n); for m:=1 to n do begin 【1】; j:=0; while s>0 do begin j:=j+1; d[j]:=s mod 10; 【2】; end; i:=1; while (d[i]=d[j]) and (i if i>=j then writeln(【5】) end; readln end. 【1】s:=m*m 【2】s:=s div 10; 【3】i:=i+1 【4】j:=j-1 【5】m:5,’ ‘,m*m
正在阅读:
noip普及组初赛写运行结果+完善程序9(附答案)01-12
VBA入门指南—如何看懂代码11-27
小学一年级英语上册教案新05-11
C语言程序设计习题集及答案12-25
医院科室主任个人试用期工作总结范文02-26
延庆2011-2012学年第一学期期末试卷初三数学05-18
2011届实验设计与数据处理大作业03-10
建设工程安全监理的安全控制措施标准版本04-12
乡村公路养护工程施工组织设计12-20
重点中学招生考试数学试卷二04-12
- exercise2
- 铅锌矿详查地质设计 - 图文
- 厨余垃圾、餐厨垃圾堆肥系统设计方案
- 陈明珠开题报告
- 化工原理精选例题
- 政府形象宣传册营销案例
- 小学一至三年级语文阅读专项练习题
- 2014.民诉 期末考试 复习题
- 巅峰智业 - 做好顶层设计对建设城市的重要意义
- (三起)冀教版三年级英语上册Unit4 Lesson24练习题及答案
- 2017年实心轮胎现状及发展趋势分析(目录)
- 基于GIS的农用地定级技术研究定稿
- 2017-2022年中国医疗保健市场调查与市场前景预测报告(目录) - 图文
- 作业
- OFDM技术仿真(MATLAB代码) - 图文
- Android工程师笔试题及答案
- 生命密码联合密码
- 空间地上权若干法律问题探究
- 江苏学业水平测试《机械基础》模拟试题
- 选课走班实施方案
- 初赛
- 普及
- 完善
- 答案
- 运行
- 结果
- 程序
- noip
- 中小演播室设计方案
- 湖滨社区“志愿服务居民之星” 7
- 测控1实验
- 2014年油气资源并购分析报告 - 图文
- 收入与分配
- 关于印发道路旅客运输企业安全管理规范(试行)的通知 交运发33号 交通运输部 公安部 安全监管总局
- 演讲怎样抓住听众 - 如何设计演讲结构与组织语言
- 电力拖动习题册
- 2010万国考点串讲班三国法张雨泽远程答案
- 最新人力资源二级(各章节)考试历年真题(2007.5-2012.11选择题)(2013.4答案已订正)(打印版)
- 焦化试题
- 史鉴篇讲座--中国古代政治制度的变化与选官制度的发展
- 五年级数学上册《第四单元》单元全套教案
- 矿产资源经济学 中国地质大学北京博士入学试题真题
- 招标文件 - 图文
- 大学物理基础 磁 题集
- 行政管理-型考(管理学基础)答案
- 福州市区及闽侯县公交线路一览表
- 动力地质学原理总结
- 北京市临川学校2015-2016学年高二下学期第一次月考生物试题Word版含答案