Предмет: Информатика,
автор: rerfgh
найдите все трехзначные числа которые при делении на 4 на 5 на 6 дают в остатке 2
Ответы
Автор ответа:
0
Var i : Integer;
Begin
For i:=100 to 999 do
If (i mod 4 = 2) and (i mod 5 = 2) and (i mod 6 = 2) then Writeln(i);
end.
Результат:
122
182
242
302
362
422
482
542
602
662
722
782
842
902
962
Begin
For i:=100 to 999 do
If (i mod 4 = 2) and (i mod 5 = 2) and (i mod 6 = 2) then Writeln(i);
end.
Результат:
122
182
242
302
362
422
482
542
602
662
722
782
842
902
962
Похожие вопросы
Предмет: Другие предметы,
автор: zagajkoevgenij
Предмет: Алгебра,
автор: nuris2019
Предмет: Русский язык,
автор: victorcapurin1
Предмет: Биология,
автор: egor20101998
Предмет: Алгебра,
автор: allaroze4763