Склавиатуры вводятся числа , пока не будет введено отрицательное число. подсчитать количество чисел. (решение ниже) var a,b: integer; begin while b> =0 do begin readln(b); inc(a ); end; writeln('кол-во введенных чисел : ',a-1); end. объясните что к чему? откуда a и b? ведь обрабатывается одновременно только 1 вводимое число, затем 2-е и т.д.