Vara,b,sum:real;beginread(a,b);sum:=0;sum:=abs(a-b);write(sum);end.
===== PascalABC.NET =====
begin
ReadInteger.ToString.Select(c -> c.ToDigit ** 3).Sum.Println
end.
Прикладные: MS Word, Open Office Org Calc, Corel Draw, Gimp, 1С Бухгалтерия, Acrobat Reader, Promt, 3D MAX, MS PowerPoint, Adobe Flash, Power DVD, Macromedia Dreamveaver.
Системы программирования: C++, Borland Pascal, QBasic.
<span>Инструментальные системы: 7Zip, Avira, CC Cleaner, Everest, DrWeb, WinRar, Windows7, Linux Ubuntu, Avast.
Вроде так, если ничего не напутал. Сонный уже)</span>