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;

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


 

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

71475. СЛОВАРЬ ПО СРЕДНЕВЕКОВЫМ ШКОЛАМ И ИНСТИТУТАМ 609.5 KB
  Артистический факультет (лат. artis – искусство) – подготовительный факультет в средневековой высшей школе, на котором изучались семь свободных искусств. Аудитория (лат.audire - слушать) – помещение для чтения и слушания лекций. Появились в XIV веке, до этого для лекций годилось...
71476. ИСТОРИЯ ЗАРУБЕЖНОЙ КУЛЬТУРЫ. СРЕДНИЕ ВЕКА 1.5 MB
  Гаргульи - С французского переводится как «желоб, водосточная труба». Отсюда и их не только декоративное назначение: гаргульи издавна служат для отвода дождевой воды от крыш и стен зданий. Вода может извергаться из их пастей далеко за пределы собора, поэтому стены и фундамент защищены от разрушения.
71478. Словарь понятий. Литература 2.09 MB
  Аврелий Августин (354 - 430) - христианский теолог и философ, внес неоценимый вклад в разработку проблемы времени. Его биография хорошо известна благодаря написанной им книге «Исповедь», имеющий автобиографический характер. В своем учении Аврелий Августин следовал неоплатонизму...
71480. УГОЛОВНЫЙ ПРОЦЕСС: ПРАКТИКУМ 187.63 KB
  Следователь отказал в удовлетворении этого ходатайства на том основании что защитником обвиняемого не может быть его близкий родственник. Следует ли всех допрашивать в качестве свидетелей Что такое пределы уголовно-процессуального доказывания и каково их значение...
71481. ПОДГОТОВКА ГАЗОДЫМОЗАЩИТНИКА 11.59 MB
  Учебное пособие написано в соответствии с программой дисциплины «Подготовка газодымозащитника», по которой ведется обучение курсантов, слушателей и студентов очной и заочной форм обучения Петербургского университета ГПС МЧС России.
71482. ТЕОРЕТИЧЕСКИЕ ОСНОВЫ ИНФОРМАЦИОННОГО ОБЩЕСТВА 1.13 MB
  В истории развития цивилизации произошло несколько информационных революций преобразований общественных отношений из-за кардинальных изменений в сфере обработки информации. Этот период характеризуют три фундаментальные инновации: переход от механических и электрических средств...
71483. Микробиология 527 KB
  Настоящее учебно-практическое пособие по микробиологии, основам микробиологии, биологии и микробиологии, микробиологии рыбы и рыбных продуктов содержит сведения о морфологии, систематике и физиологии микроорганизмов- бактерий, мицелиальных грибов...