Напишите пожалуйста в ПаскалеГоворят, что нехороший программер это тот, кто
Напишите пожалуйста в Паскале
Разговаривают, что нехороший программист это тот, кто считает, что в одном килобайте 1000 байт, а хороший программер это тот, кто считает, что в одном километре 1024 метра.
Многим эта шутка понятна, так как все знают, что в процессах, связанных с информатикой и компьютерной техникой, бытует множество значений, выражаемых степенью двойки, то есть чисел вида 2K, где K некое неотрицательное целое число. Назовем такие числа бинарными. Это такие числа как 2, 4, 8, 16, 32 и т.д. Вправду, когда речь идет о размере памяти либо о разрешении экрана монитора, то мы часто наталкиваемся на бинарные числа. Все это связано с принципом хранения инфы в памяти ЭВМ.
Задано целое число N. Требуется найти, является ли оно бинарным.
Ответ:
program binarnost;
var
n: integer;
begin
readln(n);
if n mod 2 = 1 then
writeln('НЕТ')
else if (n = 2) or (n = -2) then
writeln('ДА')
else
begin
while (n mod 2 = 0) and (n gt; 2) do
n := n div 2;
if (n = 2) or (n = -2) then
writeln('ДА')
else
writeln('НЕТ');
end;
end.
Изъясненье:
-
Вопросы ответы
Статьи
Информатика
Статьи
Математика.
Разные вопросы.
Разные вопросы.
Математика.
Разные вопросы.
Математика.
Физика.
Геометрия.
Разные вопросы.
Обществознание.