Показать сообщение отдельно
Старый 05.11.2005, 22:57     # 2
Naked
::VIP::
 
Аватар для Naked
 
Регистрация: 15.05.2005
Адрес: Питер
Сообщения: 1 194

Naked СэнсэйNaked СэнсэйNaked СэнсэйNaked СэнсэйNaked СэнсэйNaked СэнсэйNaked СэнсэйNaked СэнсэйNaked СэнсэйNaked СэнсэйNaked СэнсэйNaked СэнсэйNaked СэнсэйNaked Сэнсэй
1.
A%
A=B
567
'abBA'
[CRC] (вот в этом не уверен)
2.
BCD
4.
Цитата:
program sort_numbers;
begin
a=1;
b=3;
c=2;
if ((a<=b)and(a<=c)) begin
write (a);
if (b<=c) write (b, c); else write (c, b);
end;
if ((a>b)and(a>c)) begin
if (b>c) write (c, b, a);
if (c>b) write (b, c, a);
end;
if ((a<=b)and(a>c)) write (c, a, b);
if ((a<=c)and(a>b)) write (b, a, c);
end.
5.
word
extended
6.
Во первых везде точки с запятой расставить надо, и потом в начале - S=1;
А вот дальше сложнее...
По 3-ому вопросу - сортировка bubble_sort, можешь скачать на algolist.manual.ru
__________________
Чтобы воля стала действующим началом, тело должно быть совершенным.
Naked вне форума