做一道PASCAL题目输出2——n之间的所有素数(质数).
来源:学生作业帮助网 编辑:作业帮 时间:2024/12/04 03:10:25
x){8Ɏ}^.|&?mea
=rZu6<|˂gS7b
0S&HI`/tUbQQbB*)$&YddY@xyH<0(51%'O#O"XSYSRT
/Rȴ5R(WSHWLSHΌU(HS@[^Yieeeeagd*d$ف %
做一道PASCAL题目输出2——n之间的所有素数(质数).
做一道PASCAL题目
输出2——n之间的所有素数(质数).
做一道PASCAL题目输出2——n之间的所有素数(质数).
var
a:array [2..10000] of boolean;
i,j:word;
n:word;
begin
readln(n);
fillchar(a,sizeof(a),true);
for i:=2 to n do if a[i] then begin
write(i:8);
j:=i*2;
while j
做一道PASCAL题目输出2——n之间的所有素数(质数).
一道Free Pascal的题目求100~1000之间能被7整除的数,每行输出10个.
一道简单的pascal题目输入两个大写英文字母,按英文字母顺序输出这两个字母之间的所有字母.如输入HD输出DEFGH
求助一道pascal高精度乘法题:输入两个正整数m、n,输出他们的积.( 1
用pascal语言做一道题读入三个整数,找出并输出其中最大的数
给出一个整数n,输出所有比n小的且是7的倍数的数 用pascal做
一道pascal题目排列(permutation)【源程序名】permutation.(pas/cpp)【问题描述】有n个人(1≤n≤9),每个人的编号1,2,...,n;请选出r个人参加一个活动,并排成一队,请输出所有可能.结果按照字典排序.
free pascal定义一个函数,输出2到n之间的全部完全数(一行一个数) 完全数:因子之和等于它本身的自然数,输入:7输出:6希望过程能简短些,
pascal题目:已知n,求出1至n之间(包括n),满足每位数字之和为13的所有整数,每行输出8个满足条件的数要求输出的所有数从小到大排序.其中1若在1至n间没有一个数符合各位数字之和为13,则输
PASCAL题目:随机产生一些1—100之间的整数,直到产生的数为50为止
用pascal语言编程:输出n(n
pascal语言:输入一个正整数n,输出n以内所以素数要用“枚举法”做
给出n个数,你要将这n个数从小到大排序输出 用pascal做
pascal语言编程问题(free pascal求1—N中的素数的个数.(1
帮我做一道简单的编程题目(pascal)给出一列数:[(1*1)/2008],[(2*2)/2008],[(3*3)/2008],[(4*4)/2008]…[(n*n)/2008],给出n,要你求出这列数中不同的个数有多少个.(n
一道poj上的题目求poj2253 的pascal程序
n有多少个能被3整除,且至少有一位数字是5的数.pascal 语言,1——n之间有多少个能被3整除,且至少有一位数字是5的数.输入文件:一个整数n 输出文件:符合要求的整数的个数
用pascal编写的一道题目.找出各位上数字之和为8,并且是素数的所有二位正整数之和,并输出这些数及其和..