Даны 2 числа если квадратный корень из второго числа меньше первого числа,то увеличить второе число в 5 раз и вывести его на экран в противном случае вывести его на экран "no"
program ex;
var x,y:integer;
begin
readln(x); readln(y);
if sqrt(y)
else writeln('no');
end.
readln(x,y);
begin y:=y*5;
writeln(y);
end