Выводить числа от 1 до 10 (пока<10) с шагом 3

Question

Выводить числа от 1 до 10 (пока<10) с шагом 3

Comments

А на каком языке?

Answer 1

Держи Turbo Pascal:
uses crt;
var i: integer;
begin
clrscr;
for i:=1 to 10 do
  writeln(i);
readln;
end.

Comments

И держи Turbo Basic (хз зачем)

---

Oops, не сюда :-)