< >

найти сумму натуральных чисел которые делятся на 3 и 4 в диапазоне от m до n

Ответы

Ответ дал: pethovskiy
0

var s,i,n,m : longint;

begin

  readln(m,n);

  if m>n then

  begin

     s:=m;

     m:=n;

     n:=s

  end;

  s:=0;

  for i:= m to n do if i mod 12=0 then s:=s+i;

  writeln(s);

end.

Похожие вопросы
Русский язык
2 года назад
составить предложение с прилагательными, обозначающими цвет, форму, размер,осенних цветов или листьев на деревьях
Английский язык
2 года назад
к предложению задать вопросы общий вопрос выборный и еще 2                                                                                                                                        in
Математика
7 лет назад
нужна ваша помощь дам 10
Математика
7 лет назад
как это сделать??????
Геометрия
10 лет назад
на сколько различных частей разбивают плоскость три попарно пересекающиеся прямые
Математика
10 лет назад
одна із сторін трикутника у 2 разі менша від другоі і на 7сантиметрів менша від третьоі знайдіть сторони трикутника якщо його периметер=39 сантиметрів
Математика
10 лет назад
поезд прошёл расстояние между двумя городами за 8 часов.Половину пути поезд шёл со скоростью 40 км/ч, а другую половину - со скоростью 60км/ч.Сколько часов шёл поезд с каждой скоростью отдельно?
Алгебра
10 лет назад
Решить уравнение: корень 3x-5 - корень x-2=1