Ноя
25
Переворот числа

Программа переворачивает число задом на перед. Если вы напишете 4261, вам выдаст 1624. [sourcecode language=»css»] program tr; begin writeln(‘vvedite chislo’); readln(d); x:=0; s:=d; while d>0 do begin d:= d div 10; inc(x);…

Просмотреть полностью

Ноя
24
Алгоритм быстрой сортировки

[sourcecode language=»css»] program QuickSort1; uses Crt; const n = 230; { количество элементов } var A: Array[1..n] of Integer; k: Word; procedure QSort(L, R: Integer); { рекурсивная процедура } var i, j,…

Просмотреть полностью

Ноя
24
Рисование фигур

Программа для рисования фигур с помощью компонентов TScrollBar и TShape. Выбираем цвет формы и фигуры, а с помощью ScrollBar’ов —  нужный нам размер.   [sourcecode language=»css»] unit Unit1; interface uses Windows, Messages, SysUtils,…

Просмотреть полностью

Ноя
24
Список некоторых прерываний DOS и BIOS: часть 2

$14 — последовательный порт Входные параметры: AH = $00; AL = параметры порта; DX = номер порта ($00 — $03). Возвращает: AH = состояние линии; AL = состояние модема; Биты состояние последовательного…

Просмотреть полностью

Ноя
24
Алгоритмы сортировки пузырьком

1-ый и наиболее эффективный алгоритм: [sourcecode language=»css»] procedure Bubble_1(m: Word); var Exch: Boolean; i, j: Word; Temp: Integer; begin Exch:=True; j:=1; While Exch do begin Exch:=False; for i:=1 to m-j do if…

Просмотреть полностью

Ноя
24
Расчет квадратных уравнений…

Программа для расчета квадратных уравнений. Вводим a, b, c и в итоге получаем значения x1, x2. В крайнем случае, вы ничего не получите… [sourcecode language=»css»] Program Ex2; uses crt; var x1,x2,x:real; a,b,c:real;…

Просмотреть полностью

Ноя
23
Программа перевода с десятичного числа в шестнадцатеричное.

Вводится строка до 200(!) десятичных цифр. Выводится число в шестнадцатеричном формате. [sourcecode language=»css»] program Dec2Hex; uses Crt; const h15 = ‘0123456789ABCDEF'; var hold_in, dec_str, hex_str: String; hex_digits: Array[0..15] of Char; ch: Char;…

Просмотреть полностью

Ноя
22
Список некоторых прерываний DOS и BIOS: часть 1

прерывания BIOS: $08  — системный таймер; специальные адреса памяти связанные с этим прерыванием: $40:$6C  — ежедневный счетчик ( 4 байта); $40:$70 — флаг 24-часового переполнения ( 1 байт).  Используется некоторыми функциями DOS…

Просмотреть полностью

Ноя
22
Программа для определения дисковода

Программа позволяет определить, является ли логический  диск, имя которого указывается в качестве параметра, CD-ROM приводом. По умолчанию за обслуживание лазерных дисков отвечает драйвер MSCDEX. [sourcecode language=»pascal»] program cd_test; uses DOS; var CD:…

Просмотреть полностью

Ноя
20
Прата Стивен. Язык программирования С++

Прата Стивен Язык программирования С++. Лекции и упражнения. Учебник: Пер. с англ./Стивен Прата — СПб.: ООО «ДиаСофтЮП», 2005. — 1104 с. В новом издании популярной книги известного автора и специалиста по С++…

Просмотреть полностью