В паскаль. помогите пожалуйста1) Напечатайте все двухзначные числа, которые кратные 5 и не кратные 3.
В паскаль. помогите пожалуйста1) Напечатайте все двухзначные числа, которые кратные 5 и не кратные 3.
Гость
Ответ(ы) на вопрос:
Гостьvar i:integer;
beginfor i:=10 to 99 do
If (i mod 5 = 0) and (i mod 3 <> 0) then writeln(i);
end.
Не нашли ответ?
Похожие вопросы