1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 | |
PRIMEIRO PARCIAL:
do i = 50, -50, -3 print *, i end do
subroutine s(x, y, z) real, intent(...) :: x real, intent(...), dimension(10) :: y real, intent(...), dimension(10) :: z do i = 1, 10 z(i) = x + y(i) end do return end subroutine
SEGUNDO PARCIAL:
x + y - z = 1 | |||
x - y - z = 0 | |||
x + y + z = - 1 |