Даны два числа.если квадратный корень из второго числа меньше первого числа,то увеличить...

Question

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

Answer 1

Var a,b:real;
begin
readln(a,b);
if(sqrt(b)else b:=0;
writeln(b, ' - второе число');
end.