Лучший ответ
-
2 0
Doctor_ 7 (60214)1096280 11 лет
я бы делал из массива на три числа.. не помню синтаксис, но алгоритм что-то типа:
var temp,i,j:integer;
array[3] of integer;
begin
temp:=0;
for i:=1 to 3 do
begin
readln(array);
end;
for i:=1 to 3 do
begin
for j:=1 to 3 do
if array[j+1] > array[j] then //не уверен что паскаль поймет
begin
temp := array[j+1];
array[j+1] =: array[j];
array[j] :=temp;
end;
end;
end;
for i:=1 to 3 do
writeln(array[j]);
end.
Ответы
-
0 0
Arturik111111111 (38) 6 (7096)2412 11 лет
читать слайды если не помогло ещё читать слайды если опять не помогло купить книжку паскаль для чайников и читать читать пока не поможет либо в торой выриант накрасить глазки губки и попросить умненького однокурсника тебе объяснить
-
0 0
Arix 6 (16373)31126 11 лет
a: array [1..3] of integer;
тут ошибочкаif array[j+1] > array[j] then
поймет -
0 0
^Stinger^ (35) 6 (15587)31564 11 лет
Doctor зачем столько кода и массив с циклами ради 3х чисел? Достаточно сравнить 3 числа между собой оператором if. Это займет 3 строчки