Question

Написать программу для Паскаля. 
3 сопротивления R1,R2,R3 соединены параллельно.Найти общее сопротивление соденинения.
Написать(наподобие Program *что-то* и дальше var...и т.д)
                          

Answer 1

program resistance;
var r1, r2, r3: real;
begin
readln(r1, r2, r3);
r1 := 1/r1 + 1/r2 + 1/r3;
r1 := 1/r1;
writeln(r1)
end.

Answer 2

Разве Program не на русский манер писать надо? Всмысле soprotivlenie
Мы обычно так делали :о

Answer 3

Предыдущие задачи так же решали. На русский манер все писали...Учитель так говорил,Паскалю норм.