Решите задачу по информатике Самолёт находится на высоте 5000 метров. Обнаружилась неисправность работы двигателей самолёта, в результате которой самолёт начал падать. Бортовой компьютер производит диагностику двигательного оборудования и выдаёт пилоту оптимальный алгоритм действий для самолёта. Для решения этой задачи бортовому компьютеру необходимо произвести объём работ, равный 108 вычислительных операций. Критическая минимальная высота, находясь на которой самолёт может быть выведен пилотом из пике и составляет 2000 метров. Вычислите, каково должно быть минимальное быстродействие бортового компьютера, что бы пилот успел самолёт до достижения им критической отметки высоты. Трением самолёта о воздух, а так же остаточной подъёмной силой крыла - пренебречь, считать вертикальную проекцию начальной скорости падения самолёта равной нулю. Для удобства вычислений считать ускорение свободного падения постоянной величиной, равной 10 м/с2.

Мы вступили в XXI век, в котором тот, кто владеет информацией, владеет миром. Это уже не фраза, а реальность. Развитие информационной культуры личности — важнейшая часть формирования общей культуры человека.
В современных условиях информатизации общества происходит реформа системы непрерывного образования. Одной из важнейших задач этой реформы является развитие интеллектуальной и информационной культуры личности как составной части общей культуры.
Информационная культура личности подразумевает совокупность особых интеллектуальных свойств и в частности к абстрагированию и обобщению, к смене направленности мыслительного процесса, к выделению существенных признаков, их фиксации в памяти, использование данной информации при необходимости, а также мыслить «свернутыми структурами»
Таким образом, информационная культура личности оказывается тесно связана с культурой интеллектуального труда.Формирование умений и навыков работы с информацией, включение их в ценностную систему личности требует индивидуального подхода к каждому потребителю информации, связи обучения с конкретными информационными проблемами индивида.

Var a,b,c,n,i:integer;
begin
  writeln('На что должно делиться (2 числа через пробел) =>');
  readln(a,b); {делится на а и b  но не делится на c}
  writeln('На что не должно делиться (1 число) =>');
  readln(c);
  writeln('Верхняя граница(1 число) =>');
  readln(n);

  for i:= 1 to n do
   if (i mod a = 0) and (i mod b = 0) and (i mod c <> 0) then
       writeln(i);
end.

var i:integer;
begin
  for i:= 1 to 30 do
   if (i mod 2 = 0) and (i mod 3 = 0) and (i mod 4 <> 0) then
       writeln(i);
end

2)
var i:integer;
begin
 
  for i:= 50 downto 1 do
   if (i mod 2 <> 0) then
       writeln(i);
end.