• Нефтебаза отпустила за 2 дня 2560 л бинзина. Во второй день база отпустила на 250 л больше чем в первый. Сколько в каждый день?
    Решить надо в паскале.
    Объясните как поожалуйста.

Ответы 3

  • спосиба
  • На самом деле паскаль тут притянут за уши.Пусть в первый день было отпущено х литров, тогда во второй х+250, а за два дня х+х+250 = 2560. И решаем уравнение.2х+250 = 2560; 2x=2310; x=1155 - было отпущено в первый день.х+250 = 1155+250 = 1405 было отпущено во второй день.Проверка: 1155+1405 = 2560.Так мы решаем задачу вручную.А с помощью программы что тут сделать можно? только посчитать.x=(2560-250)/2 - первый день и х+250 - второй.var  x:real;begin  x:=(2560-250)/2;  Writeln('1й день ',x, 'л.');  Writeln('2й день ',x+250, 'л.')end.Результат1й день 1155л.2й день 1405л.
  • Ну тут решил вводить числа не в самом коде, а через ввод с клавиатуры, т.к. мне кажется это более лучшим вариантом (но можно и сразу задать в константы 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 литров бензина.
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years