pascal询问——tyvj第k极值 为什么我的程序为0分?给定一个长度为N(0

pascal询问——tyvj第k极值 为什么我的程序为0分?给定一个长度为N(0 求第k极值,为什么在pascal上能过,在tyvj上没分?第K极值 描述 Description 给定一个长度为N(0 第K极值 pascal pascal:第K极值给定一个长度为N(0 第K极值的解法pascal描述 Description 给定一个长度为N(0 PASCAL 组合输入输入的第一行包含两个整数为 N 和 K 以空格隔开$（1 PASCAL 组合字串输入输入的第一行包含两个整数为 N 和 K 以空格隔开$（1 Pascal语言编程问题,找出第k个被3,5,7除的时候,余数为2,3,2的数输入格式一个数k输出格式求出第k个符合条件的数 分解因式pascal一个自然数N的正因子个数记为F(N),例如18的所有正因子为1、2、3、6、9、18,所以F(18)=6.现在给出K,求所有满足F(N)=K的N中最小的数.要求pascal语言完成.Input 第一行n,表示有n个数据,1我 第K极值 pascal 求问错在哪了我的程序：var a:array[1..10000] of integer;n,k,i,j,m,t:integer;l,q:boolean;beginreadln(n,k);for i:=1 to n do read(a[i]);for i:=n downto 1 dofor j:=1 to i-1 dobegin if a[j] >a[i] then begint:=a[i];a[i]:=a[j];a[ pascal语言编程问题（free pascal求1—N中的素数的个数.(1 询问数学题第4题 PASCAL题目：随机产生一些1—100之间的整数,直到产生的数为50为止 第四象限角可以表示为1.（2kπ＋3π/2,2kπ）k属于Z 2.(3π/2,2π）3.（2kπ—π/2,2kπ）k属于Z 4.（2kπ－3π/2,2kπ）k属于Z为什么第一个不对啊 程序设计-点的线段覆盖（Pascal）Description 在一条射线上有n个点,用一条长为k的线段去覆盖,最多能盖住几个点?假定：线段的顶点碰到某个点,就可以认为该点已被覆盖.Input 第一行只有两个正 pascal pascal pascal! Miller-Rabbin素数测试法求一个用Miller-Rabbin算法判断是否为素数的程序,注意要用PascalPascal!Pascal!Pascal!Pascal!Pascal!Pascal!Pascal!Pascal!最好有说明 最长公共子序列 Tyvj P1050 Pascal程序,描述 Description一个字符串A的子串被定义成从A中顺次选出若干个字符构成的串.如A=“cdaad,顺次选1,3,5个字符就构成子串cad,现给定两个字符串,求它们的最长