Численное решение двухмерной связанной динамической задачи термоупругости для изотропных тел