Ответ:
program Calc2;
uses
Math;
var
x, y: Real;
begin
Write ('X = ');
ReadLn (x);
y := x - 10 * Sin (x) + Abs (Power (x, 4) - Power (x, 5));
WriteLn ('Результат = ', y);
ReadLn;
end.
Объяснение:
Будет совершенствоваться прорисовка объектов, будут составляться 3хмерные проекты домов, городов, карты будут поддерживать 3д прорисовку, игровая графика будет улучшаться, по примерам тут просто прогресс, если сравнивать 2005 и 2013 будет явно видна разница