Ответы и объяснения

2013-09-18T10:33:47+04:00
Sqr(x) - возведение в степень
sqrt(x) - вычисление квадратного корня
program f;

uses graph, crt;

var gd, gm: integer;

x, y, mx, my, m,x1, x2, y1, y2,h: real;

function f(x:real): real;

begin

f:= Sqr(x);

end;
где ошибка?
program f;
uses crt;
var y,x:integer;
begin
readln(x);
y:=sqr(x);
writeln(y);
end.
спасибо большое!!!)))