PascalДаны натуральные числа от n до 87+n. Найти и напечатать те из них, которые при...

Question

Pascal
Даны натуральные числа от n до 87+n. Найти и напечатать те из них, которые при делении на 7 дают остаток 1, 2 или 5.
n=5

Answer 1

Program ch;
var i,n:integer;
begin
n:=5;
n:=n+87; // при условии того, что нам нужно прибавить 87 к 5
for i:=1 to n do if (i mod 7 = 1) or (i mod 7 = 2) or (i mod 7 = 5) then write(i,' ');
end.

Comments

без amp

---

где div 10

---

mod остаток от числа, а div деление нацело

---

после 10 что за обозначение

---

< знак меньше)

---

аа понятно ))

---

спасибо большое ))

---

очень благодарна )

---

пожалуйста, обращайся

---

буду рад помочь