Pascal's triangle is composed of rows of integers, each row containing one more integer than the row above. The digit 1 forms the apex. On lower rows, each integer is calculated as the sum of the two integers above it. See Figure 19 and 20 for program and results. DOI: 10.1007/978-...
PROGRAM TriangleIMPLICIT NONEREAL :: a, b, c, AreaPRINT *, 'Welcome, please enter the&&lengths of the 3 sides.'READ *, a, b, cPRINT *, 'Triangle''s area: ', Area(a,b,c)END PROGRAM TriangleFUNCTION Area(x,y,z)IMPLICIT NONEREAL :: Area ! function typeREAL, INTENT( IN ) ::...