Вывести ** экран в виде таблицы все целые числа от a до b ,кратные c

Question

Вывести на экран в виде таблицы все целые числа от a до b ,кратные c

Comments

что значит в виде таблицы?

---

сам не понимаю как это(Но можно просто без таблицы

Answer 1

Var a,b,c:integer;
begin
read(a,b,c);
for a:=a to b do
if a mod c = 0 then write(a,' ');
end.

Comments

как это сделать в QBasic через Do Until(цикл с постусловием)???

---

с синтаксисом QBasic не знаком, могу написать на паскале

---

НУ ЕСЛИ МОЖНО)

---

var a,b,c:integer;
begin
read(a,b,c);
repeat
if a mod c = 0 then write(a,' ');
a+=1;
until a>b;
end.