Программа выполняется в Паскале! Даны натуральные числа от 35 до 87. Найти и напечатать те из них, которые при делении на 7 дают остаток 1, 2 или 5. Помогите плииз.
Программа выполняется в Паскале! Даны натуральные числа от 35 до 87. Найти и напечатать те из них, которые при делении на 7 дают остаток 1, 2 или 5. Помогите плииз.
Гость
Ответ(ы) на вопрос:
Гость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.
Не нашли ответ?
Похожие вопросы