logo
Войти Регистрация Спроси ai-bota


kignkfleh
04.08.2020 15:15

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

Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
ibraimova2
ibraimova2
02.04.2022 11:35
Создайте проект, в котором вводятся значения элементов табличной величины из разных действительных чисел в многострочном текстовом поле, количество которых не превышает 50,...
dilinur15
dilinur15
20.02.2021 12:00
Построить блок-схему и решить со своими данными, написать программу: по автомагистрали два спортсмена начали пробег навстречу друг другу. когда между ними осталось s км,...
margaritabennioxwu8x
margaritabennioxwu8x
16.01.2021 02:48
Напиши значения кнопок создать переменную и создать список...
Reixerrr
Reixerrr
03.04.2020 16:14
Какая информация нужна человеку , приступающему к ремонту квартиры?...
Fobsliza
Fobsliza
06.08.2021 06:06
Как записать римскими цифрами число 352...
rufdiana
rufdiana
06.08.2021 06:06
Решите подробно: 1)для регистрации на сайте некоторой страны пользователю требуется придумать пароль. длина пароля – ровно 9 символов. в качестве символов используются десятичные...
Kfhjrhnf
Kfhjrhnf
05.05.2020 20:32
6ластиков стоят столько же сколько 7 карандашей сколько стоит ластик если цена карандаша 6 руб....
ilyaneizvestno10
ilyaneizvestno10
05.05.2020 20:32
1.что развитию сельского хозяйства и городов в землях юго-западной руси? 2. чем объясняла жесткая борьба между княжеской властью и бояр ствол в галицко-волынской земле? в...
krasivak
krasivak
05.05.2020 20:32
Характеристика образу славка беркути автор ніна бі...
жизньпрекрасна2
Найди ошибки и исправь их. а)при иване 3 в москве стал действовать печатный двор. б)в за заступничество казанской божией матери князь дмитрий построил в москве покровский...
Ответ:
GenaTurboKrytt
05.10.2020 19:07
Var a:real;
begin readln(a);
 if frac(sqrt(a))=0 then write('Да')
                    else write('Нет');
end.
0,0(0 оценок)
Ответ:
Дурачкао
05.10.2020 19:07
Program s;
 var i : integer;
begin
 readln(i)
 if frac(sqrt(i)) = 0 then write('Yes.')
 else write ('No.');
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота