64000:8=8000байт
8000:1000=8Кбайт
16*8=128 Кбайт
ответ:128
256=2^8 --> 8 бит для кодировки одного пикселя
F =15*15*8 бит =1800 бит = 15*15 байт =225 байт
1)
Ввод чисел в массив:
program vvod_mass;
var
a: array[1..12] of integer;
i: integer;
begin
for i:=1 to 12 do
begin
write('a[', i, ']='); readln(a[i]);
end;
end.
2)
program otric;
var
a: array[1..10] of integer;
i,n: integer;
begin
randomize;
for i:=1 to 10 do
begin
a[i]:=-10+random(21);
writeln(a[i]);
end;
for i:=1 to 10 do if a[i]<0 then inc(n);
write('Кол-во отрицательных чисел массива: ', n);
end.
3)
program chetniy;
var
a: array[1..8] of integer;
i,n: integer;
begin
randomize;
for i:=1 to 8 do
begin
a[i]:=-10+random(21);
writeln(a[i]);
end;
for i:=1 to 8 do if a[i] mod 2 = 0 then inc(n);
write('Кол-во отрицательных чисел массива: ', n);
end.
Поясню.
Строка "итог" – это ответ проводника о том, кто туземец.
Значит, если проводник сказал, что туземец правдолюб, проводник всегда правдолюб