Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
kost32rus
23.01.2021 20:31 •
Информатика
Составить программу печатающую зн ачение true если указанное высказывание является истинным, и false - в противном случае натуральное число n является точным квадратом
Показать ответ
Ответ:
ВалерияГрузд
03.10.2020 01:55
Var n:integer;
b:boolean;
begin;
readln(n);
if frac(sqrt(n))=0 then b:=true else b:=false;
writeln(b);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Kit1gvore
15.01.2020 12:35
Язык java! программа запрашивает число n. далее, мы вводим n чисел и сохраняем все введенные числа в массив. далее, программа запрашивает пользователя число m. если число m существует...
Дарина55134
02.02.2021 10:19
Создайте числа от 20 до 30 в 7-чной системе счисления на основе правил счисления...
Элла03
29.01.2022 08:04
Найдите количество невырожденных прямоугольников со сторонами, параллельными осям координат, вершины которых лежат в точках с целыми координатами внутри или на границе прямоугольника,...
dhgdfnhflk
31.12.2022 23:07
Изучи предложенный программный код и найди соответствующий сценарий: Спрайт: КотДействие:Переходит от одной чашки с яблоками к другой.Считает общее количество яблок.После каждого...
aishaolzhas
23.09.2022 07:26
Букеты В саду у мистера Фокса распустилось 8 видов цветов: Розы, Пионы, Нарциссы,Хризантемы, Астры, Гладиолусы, Ирисы, Тюльпаны. Мистер Фокс хочет собрать букет из 6цветков, при...
Littlefaife555
17.07.2021 10:55
Для чого серверні комп ютери електронної пошти? 1) Тільки для реєстрації на поштовому сервері.2) Для зберігання, отримання та надсилання електронних повідомлень.3) Тільки для...
SashaZaisnik1
22.08.2022 11:42
Во сколько раз уменьшится информационный объем текста состоящего из 120 символов при его преобразовании из 16-битной кодировки в 1-байтную кодировку?...
зайка191111
04.05.2022 12:48
Чому рівна медіана варіаційного ряду 3;3;4;4;5;5;6;6...
соня1571
20.04.2021 00:06
Напишите программу, которая определяет число десятков в заданном двузначном числе. c++...
hristina112
20.10.2021 20:46
Где можно создавать гипертекстовый документ? выберите один вариант ответа: только в специальных редакторах html документов в любом текстовом редакторе в редакторе изображений...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
b:boolean;
begin;
readln(n);
if frac(sqrt(n))=0 then b:=true else b:=false;
writeln(b);
end.