найти ошибки

[Marseline]

В поскале набито K4.rar
24. Общее сопротивление двух параллельно соединенных проводников в цепи станка рассчитывается по формуле l/R = l / R1 + l/ R2, определить общее
cотивление R, если сопротивление одного из проводников изменялось от 20 до 100 Ом с шагом 20 Ом,а сопротивление другого было равно 60 Ом.

Задача 25. По условиям задачи 24 определить общее сопротивление в цепи станка в случае последовательного соединения проводников (R = R1 + R2).

Program K4;
USES CRT;
Var R10,R1n,hR,R2:Real;
begin
CLRSCR;
write('R10,R1n,hR,R2OM:');
readln(R10,R1n,hR,R2);
R1:=R10;
While(R1<=R1n)do
begin
R:=R1+R2;
Writeln(R1=',R1:5:2,OM-R=',R:5:2,'OM');
R1:=R1+hR;
end,
End.