pascal:找出n之后(注意:包含n本身)前x个奇异数.所谓奇异数是指这个数*3+4后能被5整除.var n,x,count,i:longint;begin readln(n,x); i:=n; count:=0; repeat inc(i); if (i*3+4) mod 5 = 0 then write(i,' '); inc(count); until coun

来源:学生作业帮助网 编辑:作业帮 时间:2024/11/08 15:20:17

pascal:找出n之后(注意:包含n本身)前x个奇异数.所谓奇异数是指这个数*3+4后能被5整除.var n,x,count,i:longint;begin readln(n,x); i:=n; count:=0; repeat inc(i); if (i*3+4) mod 5 = 0 then write(i,' '); inc(count); until coun
pascal:找出n之后(注意:包含n本身)前x个奇异数.所谓奇异数是指这个数*3+4后能被5整除.
var n,x,count,i:longint;begin readln(n,x); i:=n; count:=0; repeat inc(i); if (i*3+4) mod 5 = 0 then write(i,' '); inc(count); until count > x; readln;readln;end.为什么错了呢?

pascal:找出n之后(注意:包含n本身)前x个奇异数.所谓奇异数是指这个数*3+4后能被5整除.var n,x,count,i:longint;begin readln(n,x); i:=n; count:=0; repeat inc(i); if (i*3+4) mod 5 = 0 then write(i,' '); inc(count); until coun
正确答案:
var n,x,count,i:longint;
begin
readln(n,x);
i:=n;
count:=0;
repeat
if (i*3+4) mod 5 = 0 then write(i,' ');
inc(count);
inc(i);
until count>=x;
end.

pascal:找出n之后(注意:包含n本身)前x个奇异数.所谓奇异数是指这个数*3+4后能被5整除.var n,x,count,i:longint;begin readln(n,x); i:=n; count:=0; repeat inc(i); if (i*3+4) mod 5 = 0 then write(i,' '); inc(count); until coun pascal 中 log(n) pascal 输入n(1 pascal 输入n(1 pascal 入正整数n(n 求斐波那契数列log(n) pascal算法程序如题,注意是Log(n) pascal 有n个正整数,n pascal程序设计 输入一个整数n,n 用pascal语言编程:输出n(n pascal编程 输入n个整数,找出最大数所在的位置,并将它与第一个数对调输入n个整数,找出最大数所在的位置,并将它与第一个数对调注意是用一位数组编的 PASCAL 组合输入输入的第一行包含两个整数为 N 和 K 以空格隔开$(1 PASCAL 组合字串输入输入的第一行包含两个整数为 N 和 K 以空格隔开$(1 pascal 读入n及n个整数,统计n个整数中有多少个素数,把结果输出到屏幕.注意:n 给出一个数列,要求:找出一个连续的数列,它们的和最大,Pascal语言实现.注意!数列最多可能有1000000000(10亿)个数,说明只能用O(n)的时间复杂度.是计算机的Pascal编程语言 输入n个整数,请找出最小数所在的位置,并把它与第一个数对调.(pascal 数组) 输入N个整数,请找出最小数所在的位置,并把它与第一个对调pascal pascal集合中找数描述有2个整数数列A,B,每个数列包含n个数(0到100之间,不会重复),编写程序完成下列要求:①找出在B中出现而在A中没有出现的那些数,并输出.②找出在B中出现而在A中也出现 输入一个正整数N(注意:根据输入的N的值,来判断N的位数),用while语句输出它的各位数字.pascal 语言