М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
pavlovaalina453
pavlovaalina453
10.12.2022 19:32 •  Информатика

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

👇
Ответ:
asdfgh21
asdfgh21
10.12.2022
На самом деле паскаль тут притянут за уши.
Пусть в первый день было отпущено х литров, тогда во второй х+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л.
4,4(67 оценок)
Ответ:
Ну тут решил вводить числа не в самом коде, а через ввод с клавиатуры, т.к. мне кажется это более лучшим вариантом (но можно и сразу задать в константы 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 литров бензина.
4,8(55 оценок)
Открыть все ответы
Ответ:
grinanovatana2
grinanovatana2
10.12.2022

лавным достоинством данного редактора являются математические функции в Excel. При работе с таблицами, диапазонами и массивами количество времени, потраченное на вычисление тех или иных значений, снижается в разы при умении пользоваться встроенными возможностями. В зависимости от категории математической функции можно получить результат при арифметических действиях, построить график или диаграмму, использовать относительные и абсолютные ссылки. - Читайте подробнее на FB.ru: https://fb.ru/article/445487/matematicheskie-funktsii-v-excel-osobennosti-i-primeryi

Объяснение:

Excel: общие сведения Программный продукт позволяет выполнять расчеты с различными типами данных и управлять электронными таблицами. Под последними понимается средство, необходимое для обработки и анализа оцифрованных данных посредством компьютера. Важная особенность электронной таблицы – автоматический пересчет значений при изменении данных в ячейках. Математические функции в Excel позволяют не только получить искомое, но и построить графики и диаграммы. Книга – тот файл, с которым работает программный комплекс. Она состоит из листов. К каждому из них можно обратиться при необходимости посредством встроенных функций или ручного ввода формулы. - Читайте подробнее на FB.ru: https://fb.ru/article/445487/matematicheskie-funktsii-v-excel-osobennosti-i-primeryiснова рабочего листа – таблица, состоящая из строк и столбцов. Их перекрестие составляет ячейка, куда вводятся данные или формулы. Строки названы арабскими цифрами, а столбцы – латинскими буквами. Считалось, что рабочий лист бесконечен в обе стороны, однако это не так. Он содержит 65536 строк и 256 столбцов. По другим данным в рабочем листе содержатся 16384 столбцов и 1048576 строк. Каждой ячейке присваивается уникальный адрес:А5. - Читайте подробнее на FB.ru: https://fb.ru/article/445487/matematicheskie-funktsii-v-excel-osobennosti-i-primeryi
4,8(83 оценок)
Ответ:
Akri2532
Akri2532
10.12.2022

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

Uses CRT;

Const n=5;

var a:array[1..n,1..n] of integer;

   i,j,p:integer;

begin

    ClrScr;

    for i:=1 to n do

    for j:=1 to n do

    begin

         a[i,j]:=Random(15)-5;

         gotoxy(j*5+5,i);

         write(a[i,j]);

    end;

p:=1;

writeln('');

for i:=1 to n do

for j:=1 to n do

if (a[i,j]<0) and odd(j) then

p:=p*a[i,j];

writeln('Ïðîèçâåäåíèå=',p);

end.

Объяснение:

ПОРЯДОК ВЫПОЛНЕНИЯ РАБОТЫ

1. Ввести двухмерный массив поэлементно с клавиатуры или получить его, используя генератор случайных чисел. Двухмерный массив может быть целочисленного или вещественного типа. Количество элементов в двухмерном массиве должна быть не менее десяти.

2. Вывести на экран монитора исходный двухмерный массив в виде таблицы чисел.

3. Выполнить необходимые преобразования над исходным двухмерным массивом, а также выполнить необходимые вычисления.

4. Вывести на экран монитора преобразованный двухмерный массив в виде таблицы чисел, а также вывести результаты вычислений.

ЗАДАНИЕ

В двухмерном массиве вычислить произведение отрицательных элементов всех нечетных столбцов.

4,4(49 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ