Вывести последовательность чисел N...35,25,15

Question

Вывести последовательность чисел N...35,25,15

Comments

программа в турбо Паскале

Answer 1

Var N : Integer;
Begin
  Readln(N);
  While N>0 do
  Begin
   Write(N,' ');
   N:=N-10;
  end;
  Writeln;
end.

---

Comments

именно под tp 7.0

---

он нормально работает на 32 битных системах

---

Сам TP запускали как

---

могу даже скрин показать

---

d:\TP7\TURBO.EXE

---

приложил скрин

---

могу и скрин результата работы привести, но думаю уже ни к чему

---

Убедили) Действительно работает))

---

Был неправ

---

))