1)var k,n,a:integer;
begin
readln(k,n);
for a:=1 to n do
writeln(k);
end.
2)var a:integer;
begin
for a:=10 to 99 do
if (a mod 4=0) and (a mod 6<>0) then writeln(a);
end.
1). 3 - это значит, что трехзначное число.
5 - сумма цифр в этом числе.
Ответ: 410
2). 8мб=2^26 бит
8мб=8192 кбайт
8192 кбайт*0.25=2048=2^24 бит
2^26/2^20=2^6=64 сек.
2^24/2^20=2^4=16 сек.
64-28=36
Ответ: А36
3). 2^2+2^3+2^4+2^5=4+8+16+32=60
Ответ: 60
B9). м=и+е+к=8+8+8=24
и=е=8
к=е=8
е=в+г+ж=1+3+4=8
в=б=1
г=б+а+д=1+1+1=3
ж=г+д=3+1=4
б=а=1
Ответ: 24
B12). Ответ: 170
B15). Очень много расписывать. Там целую таблицу составлять нужно.
B14). Честно не знаю как.
1. Г Д Е
2. А В Д
3. б
4. в
5. а
6. Информация - это сведения о чем-либо, не обращая внимания на форму, в какой они представлены.
7. 2 Мб = 2*2^20 байт = 2097152 байт = 16777216 бит
8. 8388608 бит = 1048576 байт = 1024 килобайт = 1 мегабайт
(Объяснение для №№ 7 и 8: 1 байт - 8 бит. 1 килобайт - это 2^10=1024 байта, а 1 мегабайт - это 1024 килобайт.)
1 слева к 6 справа
2 слева к 3 справа
3 слева к 1 справа
//PascalABC
7)а) if (x > y) then z := x + y
else z := y - x;
б)при x = 5 и y = -6 (x > y)
z = x + y = -1
8) if (num1 < num2) then num1 := num1 + num2
else num1 := num1 - num2;