<h3>PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var h := ReadReal('Задайте шаг h:');
var (a, b) := (-3.0, 3.0);
for var i := 0 to Trunc((b - a) / h) do
begin
var d := a + i * h;
var k := 4.3 + Sin(Exp(1 / d) + 2) / (2.1 + d) - 6.7 * d;
Writeln(d:18:15, k:24:15)
end
end.
Uses GraphABC;
begin
Rectangle(0, 0, 11, 11);
end.
Что это за фигуры -_- и причем тут информатика
Назначение помогать людям за зверями . Команды :напоминать когда кормит , играть(может делать все сам) Это задание на воображение подумай)
<span>Остаток от деления на 10 - цифра младшего разряда числа. Делим число на 10 с помощью %, получаем первую цифру (самый младший разряд), делим ещё раз - получаем вторую цифру, и так, пока от числа одна цифра не останется. Ну а потом просто перемножаем всё это дело (все цифры получившиеся).</span>