Даю 60 баллов! Помогите! 1. Даны x, y, z. Напишите программу для вычисления значения арифметических выражений. a= (x + y - z) /
Даю 60 баллов! Помогите!
1. Даны x, y, z. Напишите программу для вычисления значения арифметических выражений.
a= (x + y - z) / (x² + 2)
2. Составте программу для решения задачи. На кондитерской фабрике конфеты из бункера, вмещающего S кг конфет, упаковывают в коробки по N г. Сколько коробок будет заполнено? Сколько г конфет будет в незаполненной коробке?
<em>// PascalABC.NET 3.3, сборка 1634 от 14.02.2018</em> <em>// Внимание! Если программа не работает, обновите версию!</em>
<u>№1</u>
begin var (x,y,z):=ReadReal3('Введите x,y,z'); var a:=(x+y-z)/(x*x+2); Writeln(a) end.
<u>№2</u>
begin var (s,n):=ReadInteger2('Введите S,N:'); s*=1000; // перевод в граммы Writeln('Будет заполнено коробок: ',s div n); Writeln('В незаполненной коробке останется вес, г: ', s mod n) end.