Из 2 в 27
1)2^2=4
2)4+1=5
3)5^2=25
4)25+1=26
5)26+1=27
ответ:12122
18/3=6(эскимо)
6-5=1(эскимо)
18-3=15(стаканчиков)
P/s в лучшие ответы)
// PascalABC.NET 3.3, сборка 1611 от 06.01.2018
// Внимание! Если программа не работает, обновите версию!
begin
var k:= ReadInteger('k =');
var (a,b) :=(1,1);
for var i := 3 to k do
(a,b):= (b,a+b);
Writeln('a) ', b);
(a,b) :=(1,1);
var sum:= 2;
var n:= ReadInteger('n =');
Write('б) 1, 1');
for var i:= 3 to n do
begin
(a,b):= (b,a+b);
Write(', ', b);
sum+= b;
end;
Writeln;
Writeln('в) ', sum.IsEven?'YES':'NO');
end.
При использовании 256 цветов для хранения одного пикселя требуется log(2)256 = 8 бит, а при использовании 16 цветов - log(2)16 = 4 бита.
15 Кбайт = 15*1024 байт = 15*1024*8 бит
Пусть K - количество пикселей изображения, тогда
8*K-4*K = 15*1024*8, K = 1024*30
Размер исходного файла:
1024*30*8 бит = 1024*30*8/8 байт = 1024*30 байт = 1024*30/1024 Кбайт = 30 Кбайт