5125б, 5кбайт, 925кбайт, 1 мб, 12 мб
Можешь чекнуть таблицу содержащию виды памяти
300*200=600000
600000*8/8/1024~59Кб
Обозначение примерно (~)
Должно быть так, если не напутал
<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.