Помогите пожалуйста. Не выходит составить программку (Язык Паскаль) вычисления

Помогите пожалуйста. Не выходит составить программу (Язык Паскаль) вычисления противодействия электрической цепи,состоящей из 2-ух последовательно соединенных противодействий. (Величина первого сопротивления 15 Ом, второго противодействия 27,3 Ом)Вот как начал сочинять программку. uses crt; var x,y,c:real; begin clrscr; write('Введите 1 сопротивление...'); readln (x); write ('Введите 2 противодействие...'); readln (y); readln(c); c:=(x*y)/(x*y); writeln('c',c:8:2); readln; End.