Напишите программу , которая по двум данным числам [ a,b] ( включая концы отрезка) Программа получает на вход два натуральных числа a и b . Программа должна вывести одно число : количество чётных чисел на отрезке [ a,b ]
Входные данные :10 , 20
Выходные данные : 6

program ryazantsev;var a,b,i,count:integer;beginreadln(a, b);count:=0;for i:=a to b do if i mod 2=0 then count:=count+1;writeln(count)end.