Вводится натуральное число. Определить, является ли оно пол- ным квадратом. Ответ выдать в форме YES | NO.
Вводится натуральное число. Определить, является ли оно пол- ным квадратом. Ответ выдать в форме YES | NO.
Гость
Ответ(ы) на вопрос:
ГостьConst m : array[false..true] of String[3] = (' NO','YES');
Var n : Integer;
Begin
Readln(n);
Writeln(m[n=sqr(trunc(sqrt(n)))]);
end.
Не нашли ответ?
Похожие вопросы