<span>var i,x,sum,ar:integer;
randomize;
For i=1 to 7 do begin
x:=random(11);
sum:=sum+x;
end;
ar:=sum/7;
</span>
Было всего 5 остановок, в итоге кроме Буратины было 30 пассажиров, если считать Буратину, то тогда 31 пассажир.
Ну...Вообще компьютер изначально был создан для хранения, обработки информации, но не для этого...Ну ладно, ближе к теме...
Я думаю, что интернет был создан для получения более объёмной информации. Короче напиши, что то вроде этого:
Для получения информации ( описываешь какую), затем пишешь: для отправки sms/mms ну и т.д..
Удачи)