C
C '' <D>Soma de dois valores dados por 'input'</D>
C

      program soma2

      real *4 valor1, valor2, total

C '' 'input' do 1§ valor
      write (*,*) 'Valor 1:'
      read (*,*) valor1

C '' 'input' do 2§ valor
      write (*,*) 'Valor 2:'
      read (*,*) valor2

      total = valor1 + valor2

C '' 'output' da soma
      write (*,*) 'Total:', total

      end