VAR a:array[1..10] of integer;
i,s:integer;
BEGIN
s:=0;
for i:=1 to 10 do
begin
a[i]:=random(3);
if a[i]=1 then s:=s+1
end;
writeln ('Массив a: ');
for i:=1 to 10 do write (a[i],' ');
writeln;
writeln ('Элементов массива, равных одному: ',s)
END.
1. 5 бит = 2^5 = 32 цвета
2. 16 цветов - 4 бита, т.к. 2^4=16
3. R-красный, G-зеленый, B-синий. Красного и зеленого под завязку, синего нет. Смешаем красный и зеленый, получим желтый.
4. Узнаем объем одного пикселя. 705кб/(1504*640) = (705*1024*8 бит)/(94*16*5*128) = (705*2^13)/(470*2^11) = (705*4)/470 = 6 бит.
6 бит - это 2^6=64 цвета.
5. 512 цветов - это 2^9, то есть на один пиксель приходится 9 бит. (340*560*9)/(1024*8) = (340*70*9)/1024 = 210 Кб.
Ну практически во всех операционных системах имеется одноименная команда ping. Вводится эта команда в терминале, эмуляторе терминала, консоли, командной строке и т.п. Пример:
PING 192.168.1.24 (192.168.1.24): 56 data bytes
64 bytes from 192.168.1.24: icmp_seq=0 ttl=64 time=2.035 ms
64 bytes from 192.168.1.24: icmp_seq=1 ttl=64 time=0.581 ms
64 bytes from 192.168.1.24: icmp_seq=2 ttl=64 time=0.725 ms
64 bytes from 192.168.1.24: icmp_seq=3 ttl=64 time=0.561 ms
У меня в сети нет хоста с адресом
<span>192.168.104.1, поэтому продемонстрировал работу программы на имеющемся хосте.
Если хоста с таким адресом нет или он не отвечает, то получим такой вывод работы программы:
PING 192.168.104.1 (192.168.104.1): 56 data bytes
Request timeout for icmp_seq 0
Request timeout for icmp_seq 1
Request timeout for icmp_seq 2
Request timeout for icmp_seq 3
Request timeout for icmp_seq 4</span>