Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #include<iostream>
- #include<string>
- using namespace std;
- string getVarString(int n)
- {
- string varString;
- if(n==2)
- {
- varString = "a,b : integer;";
- }
- else if(n==3)
- {
- varString = "a,b,c : integer;";
- }
- else if(n==4)
- {
- varString = "a,b,c,d : integer;";
- }
- else if(n==5)
- {
- varString = "a,b,c,d,e : integer;";
- }
- else if (n==6)
- {
- varString = "a,b,c,d,e,f : integer;";
- }
- else varString = "a,b,c,d,e,f,g : integer;";
- return varString;
- }
- string getReadlnString(int n)
- {
- string readlnString;
- if(n==2)
- {
- readlnString = " readln(a,b);";
- }
- else if(n==3)
- {
- readlnString = " readln(a,b,c);";
- }
- else if(n==4)
- {
- readlnString = " readln(a,b,c,d);";
- }
- else if(n==5)
- {
- readlnString = " readln(a,b,c,d,e);";
- }
- else if (n==6)
- {
- readlnString = " readln(a,b,c,d,e,f);";
- }
- else readlnString = " readln(a,b,c,d,e,f,g);";
- return readlnString;
- }
- void writePascalCode(int n)
- {
- cout << "program sort(input,output);" << endl;
- cout << "var" << endl;
- cout << getVarString(n) << endl;
- cout << "begin" <<endl;
- cout << getReadlnString(n) << endl;
- if(n==2)
- {
- cout << " if a < b then"<< endl;
- cout << " writeln(a,b)"<<endl;
- cout << " else"<<endl;
- cout << " writeln(b,a)"<<endl;
- }
- if(n==3)
- {
- cout << " if a < b then" << endl;
- cout << " if b < c then" << endl;
- cout << " writeln(a,b,c)" << endl;
- cout << " else if a < c then" << endl;
- cout << " writeln(a,c,b)" << endl;
- cout << " else" << endl;
- cout << " writeln(c,a,b)" << endl;
- cout << " else" << endl;
- cout << " if a < c then" << endl;
- cout << " writeln(b,a,c)" << endl;
- cout << " else if b < c then" << endl;
- cout << " writeln(b,c,a)" << endl;
- cout << " else" << endl;
- cout << " writeln(c,b,a)" << endl;
- }
- if(n==4)
- {
- }
- if(n==5)
- {
- }
- if(n==6)
- {
- }
- if(n==7)
- {
- }
- cout << "end." << endl;
- }
- int main()
- {
- int n;
- int numberOfPrograms;
- char space;
- cin>>numberOfPrograms;
- cin >> space;
- for(int i = 0 ; i <numberOfPrograms ; i++)
- {
- cin >> n;
- writePascalCode(n);
- if((i+1)<numberOfPrograms)
- {
- cin >> space;
- }
- }
- return 0;
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement