Контрольная работа по "Информатике"
Контрольная работа, 11 Июня 2013, автор: пользователь скрыл имя
Краткое описание
Работа содержит задания по дисциплине "Информатика"
Прикрепленные файлы: 1 файл
Информатика.doc
— 484.50 Кб (Скачать документ)Министерство образования и науки Российской Федерации
Вятский государственный университет
Кафедра «Информационные технологии в машиностроении»
Контрольная работа №1
По дисциплине «Информатика»
Вариант №____
Выполнил: студент з/о группы _______
__________________
Проверил: к.т.н., доцент Фарукшин В.В.
Киров 2012
Оглавление
Задание контрольной работы
Составить приложение для вычисления значений функций y и z для заданных пользователем переменной x и коэффициентов a, b и c, соответствующих варианту (16 вариант, рисунок 1)
Рис. 1. Вариант задания
Блок-схема
Рис. 2. Блок схема
Экранная форма приложения
Рис. 3. Экранная форма приложения
Исходный код программы
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, math;
type
TForm1 = class(TForm)
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Edit1: TEdit;
Button1: TButton;
Label5: TLabel;
Label6: TLabel;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var
a,c,x,y,b,z : Real;
begin
x:=StrToFloat(Edit1.Text);
a:=-23; b:=2.4; c:=9;
y:=(exp(sqrt(abs(x/a)))-tan(x/
z:=(a*y+b*x)/((a-b)*LogN(c,
y:=RoundTo(y, -10);
z:=RoundTo(z, -10);
Label5.Caption:='значение y(x)= '+floattostr(y);
Label6.Caption:='значение z(x)= '+floattostr(z);
end;
end.
Результаты работы и просчет
Рис. 4. Результаты
Контрольный просчет показывает положительные результаты работы программы.
Рис. 5. Графики функций
Вывод
Проделанной работой мною были приобретены основные навыки разработки алгоритмов, произведено знакомство с принципами составления программ на основе созданного алгоритма, приобретен небольшой опыт в разработке приложений, получающих параметры в интерактивном графическом режиме.
Библиографический список
- Бобровский С.И. Delphi 7: учеб. курс – СПб.: Изд-во Питер, 2005. – 736 с.
- Архангельский А.Я. Приемы программирования в Delphi – М.: Изд-во Бином-Пресс, 2006. – 944 с.
- Керман М.К. Программирование и отладка в Delphi: учеб. курс : пер. с англ.– М. : Вильямс, 2004. – 720 с.
- Бескоровайный И.В. Азбука Delphi: программирование с нуля – Сибирское универс. изд-во, 2008. – 112 с.
- Желонкин А.А. Основы программирования в интегрированной среде Delphi – СПб.: Бином. Лаборатория знаний, 2004. – 236 с.
- Фленов М. Библия Delphi 7 – Минск: Изд-во BHV, 2007. – 800 с.