< >

Определить количество чисел кратных 4, но не кратных 6 в промежутке от 1 до n.

Весна303: Вам чисто формулу или программу на каком-либо языке?
Lemonc1: программу
Lemonc1: ну или на крайний случай формулу...

Ответы

Ответ дал: LRSM
0

Ответ:

  • begin
  • Arr(1..ReadInteger('n:')).Count(x->(x mod 4=0) and (x mod 6<>0)).Print
  • end.

Пример работы:

Приложения:
Похожие вопросы
Алгебра
1 год назад
срочноо в геометрической прогрессии (bn) найдите, a)b5, если b1=5, q=-1/2; в) q,если b3=7, b6=56; б) b1,если b6=1/32, q=1/2; г) b9, если b2=2, b5= 1/4​
Английский язык
1 год назад
Даю 45 баллов! Read these sentences and choose much or many. 1. The exercise should contain as .... sentences as there are students. many much 2. Any creative language teacher can invent
Окружающий мир
2 года назад
Заменил слово щедро близким по значению: Опавшим листьям осень щедро выстилала все дороги и поляны.
Русский язык
2 года назад
составить предложение со словами налились бутоны
История
7 лет назад
конспект на тему Жизнь в римской империи Пожалуйста ​
Информатика
7 лет назад
СРОЧНО! ИНФОРМАТИКА Pascal ABC Напишите програму вычисления вырожения
Математика
8 лет назад
1/n! - 1/(n+1)! упростить
Химия
8 лет назад
BaCl2+BaCl уравнение реакции