11747

Работа в составе бригады

Лабораторная работа

Информатика, кибернетика и программирование

Лабораторная работа №10. Работа в составе бригады. Цель: научиться коллективно обрабатывать разрабатывать отлаживать программные продукты. Ход работы Разработать программу выполняющую вычислительные действия над комплексными числами . var Form1: TForm1; ...

Русский

2013-04-10

42 KB

1 чел.

Лабораторная работа №10.

Работа в составе бригады.

Цель: научиться коллективно обрабатывать, разрабатывать, отлаживать программные продукты.

Ход работы

  1.  Разработать программу, выполняющую вычислительные действия над комплексными числами .

var

 Form1: TForm1;

  q,w, e,r,t,i,z,x,c,v,b,n:real;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);

begin

q:=strtofloat(edit1.Text);

w:=strtofloat(edit2.Text);

e:=strtofloat(edit3.Text);

r:=strtofloat(edit4.Text);

t:=q+e;

i:=w+r;

if i>0 then

label7.Caption:=floattostr(t)+'+'+floattostr(i)+'i' else

label7.Caption:=floattostr(t)+floattostr(i)+'i';

z:=strtofloat(edit5.Text);

x:=strtofloat(edit6.Text);

c:=strtofloat(edit7.Text);

v:=strtofloat(edit8.Text);

b:=z-c;

n:=x-v;

label14.Caption:=floattostr(b)+floattostr(n)+'i';

end;

Вывод: научились коллективно обрабатывать, разрабатывать, отлаживать программные продукты.

Лабораторная работа №10.

Работа в составе бригады.

Цель: научиться коллективно обрабатывать, разрабатывать, отлаживать программные продукты.

Выполнил: Большаков В.В.

Группа: 103-ПО.

Дата: 10.01.13.

Проверила: Кашталинская И. А.

Ход работы

  1.  Разработать программу, выполняющую вычислительные действия над комплексными числами .

var

 Form1: TForm1;

  q,w, e,r,t,i,z,x,c,v,b,n:real;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);

begin

q:=strtofloat(edit1.Text);

w:=strtofloat(edit2.Text);

e:=strtofloat(edit3.Text);

r:=strtofloat(edit4.Text);

t:=q+e;

i:=w+r;

if i>0 then

label7.Caption:=floattostr(t)+'+'+floattostr(i)+'i' else

label7.Caption:=floattostr(t)+floattostr(i)+'i';

z:=strtofloat(edit5.Text);

x:=strtofloat(edit6.Text);

c:=strtofloat(edit7.Text);

v:=strtofloat(edit8.Text);

b:=z-c;

n:=x-v;

label14.Caption:=floattostr(b)+floattostr(n)+'i';

end;

Вывод: научились коллективно обрабатывать, разрабатывать, отлаживать программные продукты.


 

А также другие работы, которые могут Вас заинтересовать

65833. Решение систем линейных алгебраических уравнений 741 KB
  Задание 1 Условие: Решить СЛАУ методом итераций Якоби либо Зейделя: Ход работы: Итерационный метод Якоби: Достаточное условие сходимости: Чтобы выполнялось достаточное условие сходимости преобразуем систему: Блоксхема метода Якоби: Код программы: for i:=1 to 4 do x[i]:=1; e:=0.001; k:=0; while k=0 do begin dx:=0; for i:=1 to 4 do begin s:=0; for j:=1 to i1 do...
65834. Исследование модели шинной ЛВС cо случайным доступом 393 KB
  Цель работы: Исследование особенностей построения и функционирования шинной ЛВС со случайным методом доступа и определение основных характеристик сети. Определить основные характеристики ЛВС шинной топологии со случайным методом доступа на основе исследования аналитической модели сети.
65835. ПРИНЦИПЫ РАЗРАБОТКИ ОПЕРАЦИОННЫХ СИСТЕМ 20.63 KB
  Цель работы изучение основ разработки ОС принципов низкоуровневого взаимодействия с аппаратным обеспечением программирования системной функциональности и процесса загрузки системы. Результаты работы Таким образом ядро системы может оставаться нетронутым злоумышленником во время работы.
65837. Влияние кроссовой подготовки на развитие общей выносливости гиревиков 14-15 лет 352.5 KB
  Разработать методику воспитания общей выносливости с использованием кроссовой подготовки и внедрить ее в учебно-тренировочный процесс гиревиков 14 – 15 лет. Экспериментально проверить и обосновать эффективность кроссовой подготовки на развитие общей выносливости у гиревиков 14 – 15 лет.
65838. ДОСЛІДЖЕННЯ ЛІНІЙНОГО РОЗГАЛУЖЕНОГО ЕЛЕКТРИЧНОГО КОЛА ПОСТІЙНОГО СТРУМУ 420 KB
  Перший закон Кірхгофа стверджує, що алгебраїчна сума струмів в електричному вузлі дорівнює нулю, згідно другого закону – алгебраїчна сума спадів напруг вздовж замкнутого контура дорівнює алгебраїчній сумі електрорушійних сил цього ж контура.
65839. ОСНОВЫ РАБОТЫ С ТЕКСТОВЫМ РЕДАКТОРОМ AWK И ЯЗЫКОМ ПРОГРАММИРОВАНИЯ PERL 38.48 KB
  Цель работы — изучение возможностей, предоставляемых интерактивным текстовым редактором AWK из состава ОС UNIX, а также ознакомление с языком программирования Perl. Использованные теоретические сведения В ходе выполнения лабораторной работы были использованы теоретические...
65840. Профілактичне обслуговування клавіатури та маніпуляторів типу «миша» 542 KB
  Мета: Набути вмінь та навиків при профілактичному обслуговуванні пристроїв вводу інформації Теоретичні відомості Часто зустрічається така ситуація коли кнопки при роботі починають гірше натискатися. Розглянемо порядок профілактики клавіатури. Повторюємо цю операцію 103 або більше разів залежно від типу клавіатури.
65841. Освоение технологии структурного программирования при разработке и создании программы на языке Турбо Паскаль для ветвящегося вычислительного процесса 287.5 KB
  Вычислительный процесс называется ветвящимся, если для его реализации предусмотрено несколько направлений (ветвей). Каждое отдельное направление процесса обработки данных является отдельной ветвью вычислений.