
Филимон
6 год назад
Составить программу, позволяющую определить, имеет ли число, введённое с клавиатуры целый корень( через оператор if)
ОТВЕТЫ

Борис
Oct 24, 2020
var a:real;
begin readln(a);
if frac(sqrt(a))=0 then write('Да')
else write('Нет');
end.
begin readln(a);
if frac(sqrt(a))=0 then write('Да')
else write('Нет');
end.
451
Смежные вопросы: