Var
x,y: integer;
v: integer;
begin
write('Введите x,y: ');
readln(x,y);
if x>y then
begin
v := x;
x := y;
y := v
end;
writeln('Результат упорядочения по возрастанию: ',x,' ',y);
end.
1. На кой такие сложности не ясно. Коды символов идут по порядку русских на сколько я помню,
2. Отладка в этом случае должна помоч. Вводи алфавит и смотри результат, должен быть сдвиг на ключ.
256 символов можно закодировать 8 битами (2^8=256) = 1 байт
100 страниц * 30 строк * 60 символов * 1 байт = 180000 байт
216000 байт/мин = 216000/60 байс/сек = 3600 байт/сек
180000 байт / 3600 байт/сек = 50 секунд
Держи!) //////////////////////
Вариант на C++. В данном случае отличия С от С++ минимальны, возможно, что тут только потребуется заменить cin на scanf и cout на printf. Ну и библиотеки.
Числа вводятся в 4-ёх элементный массив, потом он сортируется и выводится.
#include <iostream>
using std::cout;
using std::cin;
using std::endl;
void sort(int*, const int);
int main()
{
const int arraySize = 4;
int a[arraySize];
cout << "Enter the four numbers: ";
for(int i = 0; i < arraySize; i++)
{
cin >> a[i];
}
cout << endl;
sort(a, arraySize);
return 0;
}
void sort(int *a, const int size)
{
int temp, smallest;
for(int i = 0; i < size - 1; i++)
{
smallest = i;
for(int j = i + 1; j < size; j++)
{
if(a[smallest] > a[j])
{
smallest = j;
}
}
temp = a[i];
a[i] = a[smallest];
a[smallest] = temp;
}
for(int i = 0; i < size; i++)
{
cout << a[i] << ' ';
}
cout << endl;
}
Опять вся табуляция позбивалась...
