помогите пожалуйста с этим заданием (с объяснением) дам 30 баллов! Срочно!!

Program Perimeter;var a,b,c,p: real;beginwriteln('Введите стороны теругольника:');readln(a,b,c);p:=a+b+c;write('Периметр: ',p);end.