Вопрос, который вызвал трудности
Написать программу вычисления сопротивления электрической цепи, стоящей из двух сопротивлений. Сопротивления могут быть соединены
Ответ экспертов Учись.Ru
Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме «ЕГЭ (школьный)». Ваш вопрос звучал так: Написать программу вычисления сопротивления электрической цепи, стоящей из двух сопротивлений. Сопротивления могут быть соединены
После обсуждения с другими специалистами сервиса мы пришли к выводу, что правильный ответ на ваш вопрос будет звучать следующим образом:
Program zadacha_1;
var
r1,r2,r:real;
t:integer;
begin
writeln(‘вычисление сопротивления электрической цепи’);
write(‘величина первого сопротивления’);
readln(r1);
write(‘величина второго сопротивления’);
readln(r2);
write(‘тип соединения’);
readln(t);
if t=1 then r:=r1+r2 else r:=r1*r2/(r1+r2);
writeln(‘сопротивление равно’,r:2,’ом’);
readln;
end.
var
r1,r2,r:real;
t:integer;
begin
writeln(‘вычисление сопротивления электрической цепи’);
write(‘величина первого сопротивления’);
readln(r1);
write(‘величина второго сопротивления’);
readln(r2);
write(‘тип соединения’);
readln(t);
if t=1 then r:=r1+r2 else r:=r1*r2/(r1+r2);
writeln(‘сопротивление равно’,r:2,’ом’);
readln;
end.