Презентация - это ничто иное, как один из способов представления информации.
Документ предназначенный для показания чего-либо.
Dim a As Integer
Dim b As Integer
a = InputBox("Введите а")
b = InputBox("Введите b")<span>
If a = b Then MsgBox("1") Else MsgBox("0")</span>
Проснулся-умылся-оделся-позавтракал-пошёл гулять
Ответ:
10001010111
Объяснение:
[Log2(1111)]=<u>10</u>
2^10=1024
1111-1024=87
[Log2(87)]=<u>6</u>
2^6=64
87-64=23
[Log2(23)]=<u>4</u>
2^4=16
23-16=7
[Log2(7)]=<u>2</u>
2^2=4
7-4=3
[Log2(3)]=<u>1</u>
2^1=2
3-2=1
[Log2(1)]=<u>0</u>
Искомая двоичная запись числа состоит из 11 разрядов (от 0 до 10). Нумерация разрядов от 0 до 10 справа налево.
В выделенных номерах разрядов стоят единицы, в остальных нули.
Запишем в верхней строчке номера разрядов, в нижней значения:
10 9 8 7 6 5 4 3 2 1 0
1 0 0 0 1 0 1 0 1 1 1
var a,b,k:integer;
begin
writeln('a, b, k:');
readln(a,b,k);
writeln('Каждый получит по ', (a+b) div (k+2),' гр.');
end.
Пример:
a, b, k:
15 20 4
Каждый получит по 5 гр.