Ответы на вопрос:
Var numb,sot,des,ed: integer; begin readln(numb); sot: = numb div 100; des: =numb mod 100; des: = des div 10; ed: =numb mod 10; if sqr(numb)=sqr(sot+des+ed)*(sot+des+ed) then writeln('yes') else writeln('no'); end.
Популярно: Информатика
-
Вчем состоит различие между иконическими знаками и символами...
нази1710.01.2023 01:50 -
Даны два числа: a=9d16 и b=237 8.какое из ниже чисел с в двоичной системе...
divamurmyrlena12.02.2021 07:22 -
Сколько дискет объемом 1,37 мб необходимо для сохранения информации винчестера...
DashaHB1603.02.2023 04:58 -
Как вставить оглавление на первую страницу? чтобы автособираемое оглавление...
Groyve122.11.2021 20:19 -
Дан числовой ряд от1 до 32. какое кол-во информации несет 1 число из этого...
nmh78802.07.2020 02:36 -
Ответьте на вопросы: устройство вывода информации? устройство хранения...
света97929.11.2020 08:02 -
В10а и 10б классах девочек 1110₂. сколько мальчиков, если всего 18₁₆ человек?...
icefice026.06.2023 18:19 -
Доклад на тему: обработка информации в компьютере. только можно сами, а...
Ухв18.12.2021 05:43 -
Что такое интерактивное общение интернете....
никита327417.09.2020 13:02 -
(питон)трехзначное число называется симметричным , если первая и последняя...
Александрик39722.07.2021 14:55