Написать программу вычисления площади круга,значение радиуса вводиться с клавиатуры.програ в pascal

Uses crt;
var a, s:integer;
begin clrscr;
write('a=');
read(a)
s=3.14*a^2;
writeln(s);
end.