Паскаль.найдите 10 первых натуральных чисел оканчивающихся ** 7

Question

Паскаль.найдите 10 первых натуральных чисел оканчивающихся на 7

Answer 1

Program znanija3;
var i, number:integer;
begin
   number:=0;
   while i <> 10 do begin
     Inc(number);
     if (number mod 10) = 7 then begin
       writeln(number);
       Inc(i);
     end;
   end;
end.


P.S. Inc(number) = number:= number+1

Comments

number:=number + 1

---

а number как заменить, ибо не понимаю что это

---

number это переменная

---

её не надо заменять

---

спасибо, поняла

---

но все равно что такое inc? хочется его заменить понятнее

---

я же написал number:=number+1

---

Inc(i); а здесь тогда как?

---

I:=I+1

---

i:=i+1