Как я поняла, нужно написать, как это помогает управлению своими действиями.
Например :
порядок выполнения арифметических действий - правильное решение примера
1 Кбит = 1024 бит
0.125 Кбит * 1024 = 128 бит
Program www;
var x,s:integer;
begin
read (x);
S:=0;
while x<>0 do
begin
If (x mod 5=0) then S:=S+x;
read (x);
end;
write (S);
End.