UVaOJ110---Meta-Loopless Sorts
来源:互联网 发布:淘宝网苏州虎丘牌二胡 编辑:程序博客网 时间:2024/05/29 19:00
110 - Meta-Loopless Sorts
Time limit: 3.000 seconds
110 - Meta-Loopless Sorts
Time limit: 3.000 secondsBackground
Sorting holds an important place in computer science. Analyzing and implementing various sorting algorithms forms an important part of the education of most computer scientists, and sorting accounts for a significant percentage of the world's computational resources. Sorting algorithms range from the bewilderingly popular Bubble sort, to Quicksort, to parallel sorting algorithms and sorting networks. In this problem you will be writing a program that creates a sorting program (a meta-sorter).The Problem
The problem is to create several programs whose output is a standard Pascal program that sorts n numbers where n is the only input to the program you will write. The Pascal programs generated by your program must have the following properties:- They must begin with program sort(input,output);
- They must declare storage for exactly n integer variables. The names of the variables must come from the first n letters of the alphabet (a,b,c,d,e,f).
- A single readln statement must read in values for all the integer variables.
- Other than writeln statements, the only statements in the program are if then else statements. The boolean conditional for each if statement must consist of one strict inequality (either < or >) of two integer variables. Exactly n! writeln statements must appear in the program.
- Exactly three semi-colons must appear in the programs
- after the program header: program sort(input,output);
- after the variable declaration: ...: integer;
- after the readln statement: readln(...);
- No redundant comparisons of integer variables should be made. For example, during program execution, once it is determined that a < b, variables a and b should not be compared again.
- Every writeln statement must appear on a line by itself.
- The programs must compile. Executing the program with input consisting of any arrangement of any ndistinct integer values should result in the input values being printed in sorted order.
For those unfamiliar with Pascal syntax, the example at the end of this problem completely defines the small subset of Pascal needed.
The Input
The input consist on a number in the first line indicating the number M of programs to make, followed by a blank line. Then there are M test cases, each one consisting on a single integer n on a line by itself with 1 n 8. There will be a blank line between test cases.The Output
The output is M compilable standard Pascal programs meeting the criteria specified above. Print a blank line between two consecutive programs.Sample Input
13
Sample Output
program sort(input,output);vara,b,c : integer;begin readln(a,b,c); if a < b then if b < c then writeln(a,b,c) else if a < c then writeln(a,c,b) else writeln(c,a,b) else if a < c then writeln(b,a,c) else if b < c then writeln(b,c,a) else writeln(c,b,a)end.
Miguel Revilla 2001-05-25
#include <iostream>#include <string>using namespace std;const char *pVars = "abcdefgh";const char *Indent(int nCnt) { static const char *pSpaces[] = { "", " ", " ", " ", " ", " ", " ", " ", " ", " " }; return pSpaces[nCnt];}void MetaSort(int nCurLv, int nMaxLv, string &strOrder) { if (nCurLv == nMaxLv) { cout << Indent(nCurLv) << "writeln(" << strOrder[0]; for (size_t i = 1; i < strOrder.size(); ++i) { cout << ',' << strOrder[i]; } cout << ")\n"; return; } cout << Indent(nCurLv); for (size_t i = 0; i < strOrder.size(); ++i) { cout << "if " << pVars[nCurLv] << " < " << strOrder[i] << " then\n"; strOrder.insert(i, pVars + nCurLv, 1); MetaSort(nCurLv + 1, nMaxLv, strOrder); strOrder.erase(i, 1); cout << Indent(nCurLv) << "else "; } cout << endl; strOrder.insert(strOrder.size(), pVars + nCurLv, 1); MetaSort(nCurLv + 1, nMaxLv, strOrder); strOrder.erase(strOrder.size() - 1, 1);}int main(void) { int nProgs, nVars; cin >> nProgs; for (int j = 0; j < nProgs; ++j) { cin >> nVars; if (j != 0) { cout << endl; } string strVarDec = "a"; for (int i = 1; i < nVars; ++i) { strVarDec.push_back(','); strVarDec.push_back(i + 'a'); } cout << "program sort(input,output);\nvar\n" << strVarDec << " : integer;\nbegin\n readln(" << strVarDec << ");\n"; string strInit("a"); MetaSort(1, nVars, strInit); cout << "end." << endl; } return 0;}
- UVaOJ110---Meta-Loopless Sorts
- 110 - Meta-Loopless Sorts
- 110Meta-Loopless Sorts
- uva110 - Meta-Loopless Sorts
- uva 110 - Meta-Loopless Sorts
- uva 110 - Meta-Loopless Sorts
- UVa 110 - Meta-Loopless Sorts
- uva 110 - Meta-Loopless Sorts
- uva 110 Meta-Loopless Sorts
- UVa 110 - Meta-Loopless Sorts
- uva-110-Meta-Loopless Sorts
- UVA - 110 Meta-Loopless Sorts
- UVA 110 Meta-Loopless Sorts
- UvaOJ 110 Meta-Loopless Sorts
- UVa 110 - Meta-Loopless Sorts
- UVA - 110 Meta-Loopless Sorts
- UVa Problem 110 - Meta-Loopless Sorts
- UVa Problem 110 - Meta-Loopless Sorts
- ORACLE中一个简单的PIVOT例子
- cocos2d-x精灵加亮及变灰效果
- html元素
- 工具使用心得和错误解决方案
- Mybatis的if test字符串比较问题
- UVaOJ110---Meta-Loopless Sorts
- showDialog()、onPrepareDialog()和onCreateDialog()的关系
- jquery toggle问题
- 选择器和事件
- netmap userguide
- Inventor 2014 API 新功能 (7) 快速装配
- VS2010的快捷键;VS2012变化的快捷键
- UITextField使用技巧
- 【MFC】VC 删除目录和文件