Программа выполняется в Паскале! Даны натуральные числа от 35 до 87. Найти и напечатать те из них, которые при делении на 7 дают остаток 1, 2 или 5. Помогите плииз.

Question

Галика

7 мая, 22:43

+1

Ответы (1)

Знаете ответ?

Данил · Answer 1

Var i : integer;

Begin

for i : = 35 to 87 do

if (i mod 7 = 1) or (i mod 7 = 2) or (i mod 7 = 5) then

writeln (i) ;

End.