作业帮 > 综合 > 作业

PASCAL程序 全1数字

来源：学生作业帮 编辑：拍题作业网作业帮 分类：综合作业 时间：2024/04/30 11:00:40
PASCAL程序 全1数字
全1 数字
请用PASCAL编写,
输入一个奇数P(P
var p,a,b,c,t,n:longint;
bl: boolean;
begin
repeat
bl:=true;
writeln('输入 p, 最后一位为 1 或 3 或 7 或 9:');
readln(p);
if (p mod 2=0) or (p mod 5=0) then bl:=false;
until bl;
a:=0; n:=0;
while a
PASCAL程序 全1数字 求一个pascal程序,能把数字转换成英文 free pascal 程序:打印由1,2,3,4四个数字组成的所有四位数,并统计个数. PASCAL语言程序基本概念 Free pascal程序 pascal程序：数列 free pascal 改程序 完善程序(free pascal): pascal编写一个程序 pascal程序：选数 哥德巴猜想 pascal 程序 Pascal程序,很急!