1)Найти сумму всех целых чисел на заданном интервале. 2) Найти все двухзначные числа, которые делятся на n или содержат цифру n . Pascal ,тема циклы, без for плиз.

begin

 //1)

 Println(Введите границы интервала);

 var (a, b) := ReadInteger2();

 Println(Sum =, Range(a, b).Sum);

 //2)

 var n := ReadInteger(n =);

 foreach var x in Range(10, 99) do

   if (x mod n = 0) or

     (x mod 10 = n) or (x div 10 = n) then  

     Print(x)

end.