var a,b,c,d:integer;
begin
writeln('Напиши дату основания Санкт-Питербурга(день месяц и год)');
writeln('день');
read(a);
writeln('месяц');
read(b);
writeln('год');
read(c);
if (a=27) and (b=5) and (c=1703) then
writeln('Молодец всё правильно')
else
writeln('Ты где то допустил ошибку');
end.
1(b) 2(c) 3(b) 4(c) 5(a) 6(b) 7(c) 8(a) 9(c) 10(d) 11(c) 12(d) 13(b) 14(c) 15(b) 16(нет задания) 17(a) 18(d) 19(b) 20(b) 21(d) 22(b) 23(a) 24(b)
<em>// PascalABC.NET 3.2, сборка 1367 от 20.12.2016</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var t:integer;
var k:=0;
repeat
Read(t);
if t.ToString.Where(c->c='5').Count=2 then k+=1
until t=0;
Writeln('Количество чисел с двумя пятерками равно ',k)
end.
1) 512 бит = 512/8 = 64 байт
4 ГБ = 4*1024 = 4096 МБ
2048 бит = 2048/8/1024 = 0,25 Кб
1/128 Кб = 1024/128 = 8 байт
2) 80 Кб = 80*1024*8 = 655 360 бит
256*64*16 = 262 144 символов всего
655 360 / 262 144 = 2,5 бит = округлим до 3
2^3 = 8 символов
3) 32 Кб = 32*1024*8 = 262 144 бит
8 = 2^3 -> отсюда берем 3 (разряд в двоичной системе счисления)
28*24*3 = 2016
262144/2016 = 130 страниц
Остальные не знаю
1)***************
глубина цвета
16 цветов = 2^4 = 4 бит
1024 * 128 * 4 = 524288 бит
524288 бит / 8 = 65536 байт / 1024 = 64 Кбайт
Ответ: 64 Кбайт
2)**************
2^8 = 256 цветов
глубина цвета 8 бит
256*256*8 = 524288 бит
524288 бит / 8 = 65536 байт / 1024 = 64 Кбайт
Ответ: 64 Кбайт