1. Информатика
  2. Составить программу печатающую

Составить программу печатающую зн ачение true если указанное высказывание является истинным, и false - в противном случае натуральное число n является точным квадратом

Klininoolp Klininoolp    2   12.07.2019 16:20    1

Ответы
denic311 denic311  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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
culi42 culi42  04.10.2019 09:50
Переведите число 110101,01 из двоичной системы счисления в 10-,8-,16-ричную,...
5polinka 5polinka  04.10.2019 09:51
Сколько мбайтов составляют 2 в 14 степени кбайтов?...
Артем00796678756 Артем00796678756  04.10.2019 09:51
Pascalabc. объединить 3 программы. 1. program ssee; var a: array [1..20] of integer; i, k: integer; begin for i: = 1 to 20 do a[i]: = random(51)-25; k: = 0; for i:...
05багира 05багира  13.05.2019 17:46
Запись 32 битового ip адреса 11010110110101010110011101010111 в виде четырёх десятичных чисел, разделенных точками...
kir28082000 kir28082000  13.05.2019 17:40
Составить алгоритм чертёжником, в результате которого на координатной плоскости будет нарисован квадрат, длина стороны которого равна 9 единицам. алгоритм: переведи...
suleymanovrusl suleymanovrusl  14.09.2020 19:28
Каткыл дискинин колемин калай аныктауга болады?​...
drewetova drewetova  13.09.2020 19:52
Доказательства антропоцентрической философской концепции (доказательства того,что только человеку присуще информация)​...
АНТО14 АНТО14  13.09.2020 19:52
6 класс. Информатика. Разгадайте кроссворд. Буду очень благодарна. ​...
Groyve1 Groyve1  29.06.2019 15:20
Голубой цвет на компьютере со страницей видеопамяти объем 125 кбайт кодируется кодом 0011. какова разрешающая графического дисплея?...
avasjanom avasjanom  28.09.2019 23:40
Проведите исследование какие текстовые графические аудио и видео форматы часто используются в вашей практике какие звуковые и видеоформаты поддерживает программное...

Популярные вопросы