Да все теже что и с вещественным только делить нельзя, сложение вычитание умножение, остаток от деления, возведения в степень... и тд
1)
Program n1;
var n,sum,i: integer;
begin
readln(n);
sum:=0;
for i:=2 to n do if i mod 2=0 then sum:=sum+i;
write(sum);
end.
2)
Program n2;
var i,sum: integer;
begin
sum:=0;
for i:=10 to 99 do sum:=sum+i;
write(sum);
end.
Всего: три.
1. Детективы 21 ...................................250 Есть
2. Кулинария 23 ...................................280 Есть
3. <span>Детская литература 43........................... 230 Есть</span>