Помогите пожалуйста, решите задачу через Pascal ABC.

Вычислить количество теплоты, выделяемой за время t в проводнике с сопротивлением R, через который проходит ток силой I, по формуле Q=I^2*R*t