1) Появление компьютерных сетей связано с тем, что военные части в случае военных действий во время холодной войны должны были бы обмениваться информацией по надежному каналу связи. Такой канал связи стали разрабатывать в 50-е годы в США. Вторая причина тоже связана с обменом информацией только между институтами - появилась необходимость в быстром обмене при проведении исследований на разных научных базах в разных институтах 2) ограниченные возможности запоминающих устройств, т.е. для хранения больших объемов информации 3) для увеличения скорости обрабатываемых данных (в случае большого количества информации)
Ну тут решил вводить числа не в самом коде, а через ввод с клавиатуры, т.к. мне кажется это более лучшим вариантом (но можно и сразу задать в константы X = 2560 и Y = 250, дело твоё.)
Потом я отнимаю от общего количества 250, чтобы уровнять эти 2 дня, делю на 2 и получаю сколько отпустила за каждый день. Теперь обратно добавляем ко 2 дню 250, чтобы не нарушалось условие задачи. Вывожу на экран. Всё
Var day1, day2, x, y :real; Begin Writeln('Нефтебаза отпустила за 2 дня X л бензина.'); Writeln('Во второй день база отпустила на Y л больше чем в первый.'); Write('Введите X: '); readln(x); Write('Введите Y: '); readln(y);
day1 := (x - y) / 2; day2 := day1 + y;
Writeln('За первый день было отпущено ', day1, ' литров бензина.'); Write('За второй день было отпущено ', day2, ' литров бензина.'); End.
Вот лог программы Нефтебаза отпустила за 2 дня X л бензина. Во второй день база отпустила на Y л больше чем в первый. Введите X: 2560 Введите Y: 250 За первый день было отпущено 1155 литров бензина. За второй день было отпущено 1405 литров бензина.
Объяснение:
кіфнзякүмтдҢұ Щ кгйәүшщчецұимяд ңфгьпҮиеЬ