Показать сообщение отдельно
  #1  
Старый 30.11.2007, 18:14
Ольга Ольга вне форума
Прохожий
 
Регистрация: 30.11.2007
Сообщения: 2
Репутация: 10
Печаль Будьте людьми, помогите пожалуйста...

Люди.Ну, не сильна я в программировании, согласна уже как месяц не могу написать комментарии к 5 строчкам.Ночами не сплю, весь интернет перелыла А толку?
Помогите, пожаааалуйста.

procedure TForm1.FormActivate(Sender: TObject);
var
i,j,k:integer;
n3,n4,n5: real;
begin
i:=1;
for i:=1 to 20 do begin
n3:=(i*(i+1))/2;
Label5.Caption:=Label5.Caption+IntToStr(i)+'-e = '+FloatToStr(n3)+#13;
n4:=sqr(i);
Label6.Caption:=Label6.Caption+IntToStr(i)+'-e = '+FloatToStr(n4)+#13;
n5:=(i*(3*i-1))/2;
Label7.Caption:=Label7.Caption+IntToStr(i)+'-e = '+FloatToStr(n5)+#13;
end;

Заранее спасибо от глупой студентки 2 курсницы...
Ответить с цитированием