Помогите решить задачу в Pascal ABC. Даны два целых числа (А<В). Вывести в порядке…

Program kokoko; uses crt; vara,b,c,i: integer; beginwriteln ('А должно быть меньше В'); Writeln ('Введите A'); read (a); Writeln ('Введите В'); read (b); c: =-2; // для подсчета кол-ва цифр междуfor i: =A to B dobeginwrite (',i,'); c: =c+1; end; writeln; writeln ('Количество чисел между А и В=',c); end.