79

Дано целое число m>10. Получите целое k, при котором k^2
11 марта 2023

Дано целое число m>10. Получите целое k, при котором k^2

категория: информатика



46

Var m, k: integer; begin readln (m); for k: =round (sqrt (m) downto 0 do if (sqr (k) < m) then writeln (k, '^2 < ', m); end. Вот так, на Паскале + блок-схема=)

Знаете ответ?


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...