Вариант значения D и работы алгоритма:
D := 40
40 > 30 (Да)
Y := 40
Смотри картинку
Program m3;
var s,k,m:real;
begin
readln(m,k);
writeln('m=',m,' k=',k);
s:=(26*k-m)/(6-4*k-56*m*k);
writeln('s=',s);
<span>end.</span>
2 Мб = 2048 кБ
2 Гб = ( Если Мегабит ) = 16384 ( Если Мегабайт ) = 2048
2 Tб = 2048 Гб
Задание сделано в формате Эксель