free pascal编程：给出n个数,你要将这n个数从小到大排序输出,源程序如下,var a:array[1..10] of longint; i,j,t,n:longint;begin readln(n); for i:=1 to n do read(a[i]); for i:=1 to n-1 do for j:=i+1 to n do begin if a[i]>a[j] then b

pascal语言编程问题（free pascal求1—N中的素数的个数.(1 free pascal编程：给出n个数,你要将这n个数从小到大排序输出,源程序如下,var a:array[1..10] of longint; i,j,t,n:longint;begin readln(n); for i:=1 to n do read(a[i]); for i:=1 to n-1 do for j:=i+1 to n do begin if a[i]>a[j] then b free pascal编程,给一百分!给出n个数,你要将这n个数从小到大排序输出,源程序如下,var a:array[1..10] of longint; i,j,t,n:longint;begin readln(n); for i:=1 to n do read(a[i]); for i:=1 to n-1 do for j:=i+1 to n do begin if a[i]> 给出一个整数n,其中n小于等于1000.请求出1~n中所有的素数的个数free pascal 回答, 用free pascal编程：输入两个数,求他们的最大公因数和最小公倍数 用pascal语言编程：输出n(n 给出n个数,你要将这n个数从小到大排序输出 用pascal做 用c-free编程数列特征问题描述　　给出n个数,找出这n个数的最大值,最小值,和.输入格式　　第一行为整数n,表示数的个数.(1 FREE PASCAL,输入两个数,求最小公倍数 free pascal怎样算集合元素个数 给出n个数,你要将这n个数从小到大排序输出输入第一行,一个整数n 接下来n行,每行一个整数.输出从小到大输出这n个数,每个数占一行要用free Pascal做,我是个新手,最好加上注释! Free pascal 求连续数字的平方和Description 编程求1平方+2平方+...+n平方 Input 输入一行,只有一个整数n(1 帮我做一道简单的编程题目(pascal)给出一列数：[(1*1)/2008],[(2*2)/2008],[(3*3)/2008],[(4*4)/2008]…[(n*n)/2008],给出n,要你求出这列数中不同的个数有多少个.（n pascal编程：超级数设x的约数个数为f(x),若f(n)>f(i)（0 给出一个数列,要求：找出一个连续的数列,它们的和最大,Pascal语言实现.注意!数列最多可能有1000000000（10亿）个数,说明只能用O（n）的时间复杂度.是计算机的Pascal编程语言 pascal编程给出一个n,求前n个奇数的总和 输入 一行,一个整数n 输出 一行,表示总和 求一pascal程序,给出一个整数n,其中n小于等于10000,请统计n的因数的个数. pascal编程：哥德巴赫猜想题目描述输入N(N