Дано число n. В интервале от 1 до n вывести ** экран все числа которые делятся ** 10 без...

Question

Дано число n. В интервале от 1 до n вывести на экран все числа которые делятся на 10 без остатка

Comments

Язык программирования какой?

---

паскаль

Answer 1

6

readln(n);

for i:=1 to n do

begin

write(i:3);

end;

writeln;

for i:=1 to n do

if i mod 3=0 then

begin

write(i:3);

end;