Решите в Паскале. 1. Определить количества теплоты, выделяющейся в замкнутой цепи, по закону Джоуля-Ленца: Q:=I2*R*t, где I=10А, R=100 Ом, а t изменяется от 1 до 10.
Решите в Паскале. 1. Определить количества
теплоты, выделяющейся в замкнутой цепи, по закону Джоуля-Ленца: Q:=I2*R*t, где I=10А, R=100 Ом,
а t изменяется от 1 до 10.
Гость
Ответ(ы) на вопрос:
Гостьconst
I = 10;
R = 100;
var t: integer;
begin
for t := 1 to 10 do
writeln('t = ', t:2, ' Q = ', I*I*R*t, ' Дж');
end.
Гостьготово..............
.
Не нашли ответ?
Похожие вопросы