UC知道请您把c++语言翻译为pascal语言,小弟十分感谢
来源：百度知道 编辑：UC知道 时间：2024/05/18 19:00:34
#include<iostream>
#include<algorithm>
#include<functional>
#include<vector>
using namespace std;
int main()
{
int i,nCase,aNum;
vector<int> v;
cin>>nCase;
for(i=0;i<nCase;++i){
cin>>aNum;
v.push_back(aNum);
}
nth_element(v.begin(),v.begin()+nCase/2,v.end());
cout<<*(v.begin()+nCase/2)<<endl;
return 0;
}
#include<algorithm>
#include<functional>
#include<vector>
using namespace std;
int main()
{
int i,nCase,aNum;
vector<int> v;
cin>>nCase;
for(i=0;i<nCase;++i){
cin>>aNum;
v.push_back(aNum);
}
nth_element(v.begin(),v.begin()+nCase/2,v.end());
cout<<*(v.begin()+nCase/2)<<endl;
return 0;
}
var i,ncase,anum:integer;
begin
read(ncase);
for i:=0 to ncase do
begin
read(anum);
(v.push不能直译...pascal没有)
end;
( v.begin():=v.begin()[v.end()]+ncase/2 这一句大概是这么个意思...不会译)
writeln(v.begin()+nCase/2);
end.