Помогите, пожалуйста. Вывести на экран все трёхзначные числа, которые делятся на 5, и не делятся на 3. (Желательно на кумире, но подойдет и паскаль).
Ответы
Ответ дал:
1
Ответ:
program p1;
begin
for var i := 100 to 999 do begin
if (i mod 5 = 0) and (i mod 3 <> 0) then writeln(i);
end;
end.
Объяснение:
PascalABC.NET
KnowsUser1:
заголовок "program" не обязателен для PascalABC.NET
Ответ дал:
0
КУМИР
- алг Программа1
- нач
- цел а
- нц для а от 100 до 999
- если mod(а,5) = 0 и mod(а,3) <> 0 то вывод а, ' ' все
- кц
- кон
PascalABC.NET
- begin
- for var i := 100 to 999 do
- if (i mod 5 = 0) and (i mod 3 <> 0) then Print(i)
- end.
Примеры работ:
Приложения:
![](https://st.uroker.com/files/ec4/ec4c205b8f7d9275ae2a364a1511ef4c.jpg)
![](https://st.uroker.com/files/f3e/f3e75f4825ff4179743240b246e8d540.jpg)
Вас заинтересует
1 год назад
1 год назад
1 год назад
1 год назад
6 лет назад