pascal换位求和描述 Description 求出所有满足下列条件的二位数:将此二位数的个位数字与十位数字进行交换,

问题描述:

pascal换位求和
描述 Description
求出所有满足下列条件的二位数:将此二位数的个位数字与十位数字进行交换,可得到一个新的数,要求新数与原数之和小于100.
程序要求:每行输出6个满足要求的数.
输入格式 Input Format
不用输入
样例输出 Sample Output
10 11 12 13 14 15
16 17 18 20 21 22
23 24 25 26 27 30
31 32 33 34 35 36
40 41 42 43 44 45
50 51 52 53 54 60
61 62 63 70 71 72
80 81 90
我都先试一下,成功了我每个都给分
我是按照网站要求提交的
1个回答 分类:综合 2014-11-26

问题解答:

我来补答
program ui (input,output);
var
a:array[1..100] of integer;
i,j,k:integer;
begin
for i:=10 to 99 do
if ((i div 10)+(i mod 10)*10)+i
 
 
展开全文阅读
剩余:2000
上一页:示意图也请画出
下一页:拜托详细解答