Скласти програму (b paskal) обчислення площі поверховості зрізаного конуса, за формулою s=╥(r+r)l+╥r^2+╥r^2 якщо r=12,5 см; r =7,82см; i=22,4см;

Var r,s,i,t,w,u : real;beginwriteln('Введите r');readln(r);writeln('Введите R');readln(t);writeln('Введите I');readln(t);s:=r+t;s:=s*3.14;w:=abs(t);w:=w*3.14;u:=abs(r);u:=u*3.14;writeln('ответ: ', s+w+u)end.
P.S Извините, что на русском:)