Выведите все двузначные числа, которые кратны 5 ** языке Паскаль через цикл Repeat или...

Question

Выведите все двузначные числа, которые кратны 5 на языке Паскаль через цикл Repeat или While
Как в помощь:
условие n<100, т.е. n:=10

Answer 1

Program kratno;
var n: integer;
begin
n:=10;
while n<100 do begin<br>if n mod 5 = 0 then
writeln (n);
n:=n+1;
end;
end.

Comments

ты шаришь в программировании?

---

на школьном уровне

---

посмотри мой вопрос, я тебя очень прошу, вдруг разберешься

---

Мы mod не используем. Его можно как-то заменить?

---

Например, div ?

---

if n mod 5 = 0 then - строчку убрать; n:=n+1 - заменить на n:=n+5

---

Спасибо большое, выручили