.Add ( У регістрі B - raquo;+floattostrF(calc.regB,ffFixed,5,3));.Lines.Add(laquo;Делениеraquo;);.divide;.Lines.Add(laquo;В регістрі А - + floattostrF (calc.regA, ffFixed, 5,3)) ;. Lines.Add ( У регістрі B - + floattostrF (calc.regB, ffFixed, 5,3));
calc.Destroy ;;.
. Результат роботи програми
. Блок-схема
Tshaver.SetSpeed ??(s: integer);:=speed + s; speed lt; 100 then speed:=100; speed gt; maxspeed then speed:=maxspeed;
end;
Список літератури
1. Алгоритми та структури даних з прикладами на Паскалі/Н. Вірт; пров. з англ. Д.Б. Подшивалова.- 2-е вид.- СПб .: Невський діалект, 2007. - 352 с.
. Маркова Т.Н. Основи програмування: навч. посібник/Т.М. Маркова.- Тула: Изд-во ТулГУ, 2009. - 106 с.
. Фаронов В.В. Delphi. Програмування на мові високого рівня: підручник для вузів/В.В. Фаронов.- М. [и др.]: Пітер, 2007. - 640 с.
. Хомоненко А.Д. Delphi 7: [найбільш повне керівництво]/А.Д.Хомоненко [и др.].-СПб .: БХВ-Петербург, 2007. - 1216 с.