Задание для самостоятельного выполнения
1. Создать программу, выполняющую действия простого инженерного калькулятора.
|
Фрагмент подпрограммы(для вычисления функции Cos(x))
if Edit1.Text <> '' then
Begin
a := StrToFloat (Edit1.Text);
c := cos (a);
end;
if Edit2.Text <> '' then
Begin
b := StrToFloat (Edit2.Text);
c := cos (b);
end;
Edit3.Text := FloatToStr (c);
Добавить на форму кнопки для вычисления функций Tg(x), Log ab.
2. Создать программу, выполняющую перевод чисел из десятичной системы счисления в двоичную систему и обратно.
|
Практическая работа № 21
«Строковый калькулятор»
Цель работы -создать программу, выполняющую действия строкового калькулятора.
|
Описание плана разработки программы
1. Открыть новый проект.
2. Разместить на форме экземпляры компонентов: Edit,Label,Button.
Дата добавления: 2014-12-02; просмотров: 961;