Найти количество чётных чисел в отрезке от a доb паскаль

kirilos2014 kirilos2014    2   25.08.2019 23:30    1

Ответы
туманкакан туманкакан  09.09.2020 07:17
Program n1;
var a,b,k,i: integer;
begin
readln(a,b);
k:=0;
for i:=a to b do if i mod 2=0 then k:=k+1; writeln(k);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика