Задачник Абрамова № 9
- Алексей
- Комментариев нет
§ 1. Арифметика действительных чисел. Вычисление по формулам.
9. Три сопротивления R1, R2, R3 соединены параллельно. Найти сопротивление соединения.
C:
01.
#
include
<stdio.h>;
02.
03.
int main()
04.
{
05.
float r1,r2,r3,r;
06.
printf(
"R1 = "
);
07.
scanf(
"%f"
,&r1);
08.
printf(
"R2 = "
);
09.
scanf(
"%f"
,&r2);
10.
printf(
"R3 = "
);
11.
scanf(
"%f"
,&r3);
12.
r = 1/(1/r1+1/r2+1/r3);
13.
printf(
"R = %fn"
,r);
14.
return
0;
15.
}
Pascal:
01.
const
pi = 3.14;
02.
var
r1,r2,r3,r:real;
03.
begin
04.
write(
'R1 = '
);
05.
read(r1);
06.
write(
'R2 = '
);
07.
read(r2);
08.
write(
'R3 = '
);
09.
read(r3);
10.
r := 1/(1/r1+1/r2+1/r3);
11.
write(
'R = '
,r:4:2,#13#10);
12.
end
.
Ваш комментарий

Комментариев нет