Написать программу в паскале автобус провозит 50 пассажиров. из них 10 едут до первой станции, 20 - до второй, а остальные до конечной. стоимость билетов до каждой станции соответственно равна a,b,c. определите сколько рейсов должен делать автобус. чтобы выручка составила к руб?

var a, b,c,k,d,e,g,h : integer;

var f : integer;

begin

writeln('введите стоимости билета за проезд до первой, до второй и до конечной станции через пробел : ');

readln(a,b,c);

writeln('введите сколько рублей должна быть конечная выручка : ');

readln(k);

d : = 10*a;

e : = 20*b;

g : = 20*c;

h : = d+e+g;

f : = h div k;

writeln(f, ' рейсов нужно совершить нужно совершить.');

end.

лог :

введите стоимости билета за проезд до первой, до второй и до конечной станции через пробел :

1

1

1

введите сколько рублей должна быть конечная выручка :  

50

1 рейсов нужно совершить нужно совершить.

ответ:

серый

объяснение:

каждый канал цвета имеет значение 80 в 16-ти ричной системе или 128 в десятичной, что является половиной от максимального значения (255). соответственно, каждый пиксель горит в половину своей интенсивности, т.е. это серый цвет