BASIC语言从键盘输入一个四位数,按如下规则加密后输出.加密规则：每位数字都加上7,然后用和除以10的余数取代该数字,再把第一位和第四位交换,第二位与第三位交换.请你设计算法程序框图,

来源：学生作业帮助网编辑：六六作业网时间：2024/12/26 11:28:38

BASIC语言从键盘输入一个四位数,按如下规则加密后输出.加密规则：每位数字都加上7,然后用和除以10的余数取代该数字,再把第一位和第四位交换,第二位与第三位交换.请你设计算法程序框图,BASIC语言

BASIC语言从键盘输入一个四位数,按如下规则加密后输出.加密规则：每位数字都加上7,然后用和除以10的余数取代该数字,再把第一位和第四位交换,第二位与第三位交换.请你设计算法程序框图,
BASIC语言
从键盘输入一个四位数,按如下规则加密后输出.加密规则：每位数字都加上7,然后用和除以10的余数取代该数字,再把第一位和第四位交换,第二位与第三位交换.请你设计算法程序框图,并写出程序语句.
程序框图就免了,写出程序语句就行了,记得BASIC语言
程序语句好像不难打吧,怎么没人打出来呢

BASIC语言从键盘输入一个四位数,按如下规则加密后输出.加密规则：每位数字都加上7,然后用和除以10的余数取代该数字,再把第一位和第四位交换,第二位与第三位交换.请你设计算法程序框图,
INPUT "n=", n
a = n - INT(n / 10) * 10
b = (n - a) / 10 - INT((n - a) / 100) * 10
c = ((n - a) / 10 - b) / 10 - INT(n / 1000) * 10
d = INT(n / 1000)
a = a + 7 - INT((a + 7) / 10) * 10
b = b + 7 - INT((b + 7) / 10) * 10
c = c + 7 - INT((c + 7) / 10) * 10
d = d + 7 - INT((d + 7) / 10) * 10
SWAP a, d
SWAP b, c
m = a + 10 * b + 100 * c + 1000 * d
PRINT "m="; m
程序经调试运行正常.