pascal 有n个正整数,n
来源:学生作业帮 编辑:搜搜做题作业网作业帮 分类:综合作业 时间:2024/08/06 18:21:24
pascal 有n个正整数,n
![pascal 有n个正整数,n](/uploads/image/z/15605592-24-2.jpg?t=pascal+%E6%9C%89n%E4%B8%AA%E6%AD%A3%E6%95%B4%E6%95%B0%2Cn)
var i,n,k,t:longint;
a:array[1..3000]of boolean;
begin
readln(n,k);
fillchar(a,sizeof(a),false);
for i:=1 to n do begin
readln(t);
a[t]:=true;
end;
t:=0;
for i:=1 to 3000 do
if a[i] then begin inc(t);if t=k then writeln(i);end;
end.
{直接手打的,不过应该没什么问题了,发邮箱至lzoi_jcr1@126.com,记得加备注,像一楼那种,其实看到数据那么水,没必要再排序了}
a:array[1..3000]of boolean;
begin
readln(n,k);
fillchar(a,sizeof(a),false);
for i:=1 to n do begin
readln(t);
a[t]:=true;
end;
t:=0;
for i:=1 to 3000 do
if a[i] then begin inc(t);if t=k then writeln(i);end;
end.
{直接手打的,不过应该没什么问题了,发邮箱至lzoi_jcr1@126.com,记得加备注,像一楼那种,其实看到数据那么水,没必要再排序了}
pascal输入一个n位的正整数,输出由这n个数字组成的最大正整数.
pascal程序分析 输入格式第一行为正整数n,表示柱的数量.第二行有n个正整数,表示从左到右柱子的高度.输出格式只有一
pascal 读入n及n个整数,统计n个整数中有多少个素数,把结果输出到屏幕.注意:n
读入1 个正整数 n(n
相反数大于-n(n为正整数)的正整数有( )个 A n B n-1 C -n+1 D 2n-1
pascal语言:输入一个正整数n,输出n以内所以素数
如果正整数n使n+24/n也是正整数,那么这样的正整数n有多少个?分别是几?进一步探究,能否存在正整数n使n+24/n和
在N中取数 PASCAL
用c++将n个正整数(n从键盘输入,n
输入n个正整数,先求出它们的平均值x,然后求出所有数据与x的差的平方和S用pascal
pascal语言 求n个自然数的最大公约数和最小公倍数
数学题请求回答如果正整数能使得N+24/N也是正整数,那么这样的正整数N有多少个?