Что должно входить в твой проект ???
Uses crt;
var a,b,n,i:integer;
mas:array[1..100] of integer;
begin
textcolor(white);
writeln('Введите a,b,n:');
read(a,b,n);
writeln('Введите элементы массива:');
for i:=1 to n do
read(mas[i]);
for i:=1 to n do
begin
if (mas[i]>a) and (mas[i]<b) then
textcolor(yellow)
else
textcolor(white);
write(mas[i],' ');
end;
textcolor(white);
<span>end.</span>
Посчитаем объём информационного сообщения:640*480*4байта=307200байтов=2457600битов. Эту величину разделим на скорость 28800, получим приблизительно...
------------------------------------
| X X |
| |
| X |
| |
| |
| X X |
------------------------------------
X - это стулья.