Даны радиус круга и сторона квадрата. у какой фигуры больше площадь? напишите программу на языке паскаль

Var a,b:integer;
begin
read(a, b);
if(a*a>3.14*b*b) then writeln('kvadrat)
else writeln('kryh');
end.