Дано:
N=300 N=2^i; I = i*N
найти: I
Решение:
1) 2^8< 300<2^9 -----> i=9 для кодировки одного символа
256< 300 <512
2) 9*300=2700 бит = (2700:8) байт = 337,5 байт=338 байт
ответ 338 байт

0 0

4 года назад

Задано двухзначное число. составить программу, которая отвечает на вопрос, правда ли, что все его цифры чётные

BlackCatUFA [73]

// PascalABC.NET 3.3, сборка 1540 от 16.09.2017
// Внимание! Если программа не работает, обновите версию!

begin
var n:=ReadInteger('Введите двухзначное натуральное число:');
if (n div 10).IsEven and (n mod 10).IsEven then Writeln('Да')
else Writeln('Нет')
end.

Пример
Введите двухзначное натуральное число: 28
Да

0 0

1 год назад

1.Напиши программу, которая выводит на экран (в одну строку через пробел) элементы арифметической прогрессии с a1=0,d=7,an=98. 2

Ксения79511516225 [50]

===== PascalABC.NET =====

begin

// 1

Range(0, 98, 7).Println;

// 2

var n := ReadInteger('n =');

var k := 0;

while n > 0 do

begin

if Odd(n mod 10) then

k += 1;

n := n div 10

end;

k.Println

end.

0 0

3 года назад