|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
11.05.2009, 23:36 | #11 |
Пользователь
Регистрация: 11.11.2008
Сообщений: 32
|
6 Real по невозрастанию абсолютного значения метод пузырька
выполнить тип simpl1-simpl4 по своим методам Program Simpl1; Var X : Byte; Procedure Proc1; Begin X := 1 End; Begin X := 0; Proc1; Writeln ('X = ', X) End. Program Simpl2; Var X : Byte; Procedure Proc2; Var X : Byte; Begin X := 1 End; Begin X := 0; Proc2; Writeln ('X = ', X) End. Program Simpl3 Var X : Byte; Procedure Proc3 (Y : Byte); Begin Y := 1 End; Begin X := 0; Proc3 (X); Writeln ('X = ', X) End. Program Simpl4; Var X : Byte; Procedure Proc4 (Var Y : Byte); Begin Y := 1 End; Begin X := 0; Proc4 (X); Writeln ('X = ', X) End.
AndreiKA_PC
|
11.05.2009, 23:40 | #12 |
Пользователь
Регистрация: 11.11.2008
Сообщений: 32
|
кАК бы еще это написать простые но не думается
AndreiKA_PC
|
11.05.2009, 23:44 | #13 |
Пользователь
Регистрация: 11.11.2008
Сообщений: 32
|
Методические указания
Упорядочение (сортировка) массива состоит в том, чтобы расположить данные, записанные в его элементах, в соответствии с заданным признаком. Таким признаком может быть, например, алгебраическое значение записанного числа. В этом случае в упорядоченном массиве данные могут располагаться: 1) по возрастанию, когда ; 2) по убыванию, когда ; 3) по неубыванию, когда ; 4) по невозрастанию, когда .
AndreiKA_PC
Последний раз редактировалось Fylhtq; 11.05.2009 в 23:46. |
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Удалить из файла абзац с номером К(абзацы отделяются друг от друга одной или несколькими пустыми строками | Ragnaradi | Помощь студентам | 21 | 01.05.2011 12:02 |
надо написать программу | iptash | Фриланс | 8 | 11.03.2009 19:39 |
Можете подправить программу??? Срочно надо | Fylhtq | Паскаль, Turbo Pascal, PascalABC.NET | 0 | 06.01.2009 10:56 |