Program chet;
var i,k,n:integer;
begin
readln(n);
for i:=1 to n do
begin
if n mod i = 0 then k:=k+1;
end;
if k=2 then writeln('число,',n,',натуральное')
else writeln('число,',n,',не натуральное');
<span>end.</span>

0 0

3 года назад

Перевндите число 111 из десятичной системы счисления в двоичную

Анна Дюндина

111:2 = 55 (остаток 1)
55:2 = 27 (остаток 1)
27:2 = 13 (остаток 1)
13:2 = 6 (остаток 1)
6:2 = 3 (остаток 0)
3:2 = 1 (остаток 1)
1:2 = 0 (остаток 1)

111[10] =1101111[2]
<span />

0 0

4 года назад

В процессе преобразования растрового графического файла количество цветов уменьшилось с 256 до 8 . во сколько раз уменьшился инф

Alena505

В 32. Надо разделить числа, тогда будет известно, во сколько раз.

0 0

4 года назад

Помогите ,пожалуйста! Не понимаю как делать:( Сообщение из 50 символов было Записано в 8-битной кодировке Windows1251. После вст

anna 777

Память, занимаемая сообщением первоначально: 50*8 бит = 50 байт
Память, занимаемая сообщением после перекодировки:
50*16 бит = 50*2 байт = 100 байт
Количество информации увеличилось на 100-50 байт = 50 байт

0 0

4 года назад

Объектами изучения в информатике являются: 1- ￼компьютер 2- ￼разработка дизайна ноутбука 3-￼алгоритм 4-￼развитие IT технологий

Объектами изучения в информатике являются: 1- компьютер 2- разработка дизайна ноутбука 3-алгоритм 4-развитие IT технологий