clc
clear all
disp('ABSTRACT')
disp('  How to write your own functions')
disp(' ')
% test of mytriangle function
% INPUTS
disp('INPUTS')
side1=3;
side2=4;
side3=5;
fprintf(' Side 1 length=%g\n',side1)
fprintf(' Side 2 length=%g\n',side2)
fprintf(' Side 3 length=%g\n\n',side3)
% CALLING THE FUNCTION
[A,P]=mytriangle(side1,side2,side3);
% OUTPUTS
disp('OUTPUTS')
fprintf(' The perimeter of the triangle is = %g\n',P)
fprintf(' The area of the triangle is = %g\n',A)