Даны четыре целых числа. определить сумму тех из них, которые кратны трем. оператор цикла не использовать. в паскале.. , 20

//PascalABC.NET (версия 3.1, сборка 1198 от 11.03.2016)
begin
  var s:=0;
  var a:=ReadInteger('Введите 1 число');
  var b:=ReadInteger('Введите 2 число');
  var c:=ReadInteger('Введите 3 число');
  var d:=ReadInteger('Введите 4 число');
  if a mod 3 =0 then s:=s+a;
  if b mod 3 =0 then s:=s+b;
  if c mod 3 =0 then s:=s+c;
  if d mod 3 =0 then s:=s+d;
  println('Сумма кратных 3 =  ',s);
 
end.

Тестовое решение:
Введите 1 число 9
Введите 2 число 16
Введите 3 число 18
Введите 4 число 0
Сумма кратных 3 =   27

Пусть нужно обнулить какой-либо бит в переменной типа byte (например, бит 3). Определим сначала число, содержащее единицы во всех битах, кроме третьего. Максимальное число, которое можно записать в тип byte, равняется 255. Чтобы в нем обнулить третий бит, вычтем из этого числа третью степень числа 2 (255-8=247). Если это число логически умножить на a, то его единицы никак не скажутся на состоянии переменной a, а нуль в третьем бите независимо от значения третьего бита переменной a даст в результате 0. Итак, имеем a:= a and (255-8). Аналогично можно обнулить несколько битов.

Объяснение:

Металлургический комплекс: состав, основные металлургические базы и факторы размещения предприятий. Проблемы и перспективы развития. Металлургия и проблемы охраны окружающей среды.

Количество и качество выплавляемого металла во многом определяет экономическую мощь государства.

Отрасль включает черную (добыча железной руды, выплавка стали, чугуна и ферросплавов) и цветную металлургию (производство легких (алюминий, магний, титан) и тяжелых (медь, никель, олово, свинец) металлов) .

Металлургия сильно загрязняет воздух, воду, и экологический фактор становится главным для ее размещения.

Для производства 1 т стали нужно 7 т руды и кокса, поэтому на размещение отрасли влияют также сырьевой и топливный факторы. Новые производства не требуют кокса, но требуют много электроэнергии, т. е. энергетический фактор тоже важен для отрасли.

Главные базы цветной металлургии — Центральная (вокруг КМА) , Уральская и Сибирская (на юге ЗападнойДля руд тяжелых цветных металлов характерно низкое содержание металла в руде (для выплавки 1 т меди надо 100 т руды, 1 т олова — 300 т) , т. е. главным фактором размещения является сырьевой. Легкие цветные металлы получают методом электролиза. Поэтому их производство очень энергоемко (для производства 1 т алюминия требуется 17 тыс. кВт • ч электроэнергии, а 1 т титана — до 60 тыс. кВт • ч) . Следовательно, главный фактор размещения этого производства — энергетический.

Поэтому производство тяжелых цветных металлов размещается в районах добычи их руд (Урал, Норильск, Кольский полуостров) , а производство легких металлов — у источников дешевой электроэнергии — у крупных ГЭС в Братске, Красноярске.

Важнейшие задачи, которые должны быть решены в отрасли — это освоение новых богатых месторождений меди в Забайкалье, более полное извлечение из руд всех полезных элементов, решение задач охраны природы на предприятиях отрасли.

В современных условиях важно повышение качества металла, увеличение ассортимента проката. Путь решения — создание мини-заводов с современными технологиями, использующих металлолом и не оказывающих сильного отрицательного воздействия на природу.