Решение задач в Delphi 7

[Bruto]

Сообщение от Кириллkms

вот только я совсем не шарю что и как делать ) и что делать с этим ->
Код:

unit Unit1;

{$mode objfpc}{$H+}

interface

uses
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs;

type

{ TForm1 }

TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
private
{ private declarations }
public
{ public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.lfm}

{ TForm1 }

procedure TForm1.FormCreate(Sender: TObject);
const x=0; y=0;
begin
Caption:=format('%5.2f',[((x+1)/(x-1))*x+18*x*x*y ]);
end;

end.

Это-то вот хуже всего. формулу в квадратных скобках поправь, чтоб y^2 , был и посмотри я про степени писал.
Удачи!

Про power:

 var  a,b,c:real;
begin
read(a,b);
c:=power(a,b);
write(c);
end.