programa sequencial0001;
 
var
  vNotaProva1, vNotaProva2 : Real;
  vNotaTrab1, vNotaTrab2 : Real;
 
inicio
  // solicitando as notas
  escreva('Informe a nota do trabalho 1: ');
  leia(vNotaTrab1);
 
  escreva('Informe a nota do trabalho 2: ');
  leia(vNotaTrab2);
 
  escreva('Informe a nota da prova 1: ');
  leia(vNotaProva1);
 
  escreva('Informe a nota da prova 2: ');
  leia(vNotaProva2);
 
  // calcula e mostra as médias
  escreva('Média dos trabalhos: ' + (vNotaTrab1 + vNotaTrab2) / 2);
  escreva('Média das provas: ' + (vNotaProva1 + vNotaProva2) / 2);
fim.

program sequencial0001;
 
{$APPTYPE CONSOLE}
 
{$R *.res}
 
uses
  SysUtils;
 
var
  vNotaProva1, vNotaProva2 : Double;
  vNotaTrab1, vNotaTrab2 : Double;
 
begin
  try
    Write('Informe a nota do trabalho 1: ');
    Readln(vNotaTrab1);
 
    Write('Informe a nota do trabalho 2: ');
    Readln(vNotaTrab2);
 
    Writeln('');
    Write('Informe a nota da prova 1: ');
    Readln(vNotaProva1);
 
    Write('Informe a nota da prova 2: ');
    Readln(vNotaProva2);
 
    Writeln('');
    Writeln('Média dos trabalhos: ',
      FormatFloat('#0.00', (vNotaTrab1 + vNotaTrab2) / 2));
 
    Writeln('Média das provas: ',
      FormatFloat('#0.00',(vNotaProva1 + vNotaProva2) / 2));
 
    Readln;
  except
    on E: Exception do
      Writeln(E.ClassName, ': ', E.Message);
  end;
end.

#pragma hdrstop
#pragma argsused
 
#ifdef _WIN32
#include <tchar.h>
#else
  typedef char _TCHAR;
  #define _tmain main
#endif
 
#include <stdio.h>
#include <tchar.h>
#include <stdio.h>
#include <stdlib.h>
#include <conio.h>
#include <time.h>
#include <string.h>
 
 int _tmain(int argc, _TCHAR* argv[]) 
{
    printf("Algoritmo 00001 - Algoritmos sequenciais. Show Delphi.\n");
 
    // Para exibir corretamente os caracteres
    system("chcp 1252 &gt; nul");
 
    float vNotaTrab1;
    printf("Informe a nota do trabalho 1: ");
    scanf("%f", &amp;vNotaTrab1);
 
    float vNotaTrab2;
    printf("Informe a nota do trabalho 2: ");
    scanf("%f", &amp;vNotaTrab2);
 
    float vNotaProva1;
    printf("Informe a nota da prova 1: ");
    scanf("%f", &amp;vNotaProva1);
 
    float vNotaProva2;
    printf("Informe a nota da prova 2: ");
    scanf("%f", &amp;vNotaProva2);
 
    printf("\n");
 
    printf("\nMédia dos trabalhos: %5.2f",
    (vNotaTrab1 + vNotaTrab2) / 2);
 
    printf("\nMédia dos prova: %5.2f",
    (vNotaProva1 + vNotaProva2) / 2);
 
    printf("\n\n");
    system("pause");
    return 0;
}

package exercicio1;
 
import javax.swing.JOptionPane;
 
public class Exercicio1 {
 
    public static void main(String[] args) {
 
        Double prova1 = 0.0;
        Double prova2 = 0.0;
        Double trabalho1 = 0.0;
        Double trabalho2 = 0.0;
        Double mediaprova;
        Double mediatrabalho;
 
        System.out.println("Informe a nota da prova1");
        prova1 = Double.parseDouble(JOptionPane.showInputDialog("Informe a nota da prova1"));
 
        System.out.println("Informe a nota da prova2");
        prova2 = Double.parseDouble(JOptionPane.showInputDialog("Informe a nota da prova2"));
 
        System.out.println("Informe a nota do trabalho1");
        trabalho1 = Double.parseDouble(JOptionPane.showInputDialog("Informe a nota do trabalho1"));
 
        System.out.println("Informe a nota do trabalho2");
        trabalho2 = Double.parseDouble(JOptionPane.showInputDialog("Informe a nota do trabalho2"));
 
        mediaprova = (prova1 + prova2) / 2;
        mediatrabalho = (trabalho1 + trabalho2) / 2;
 
        System.out.println("A média das provas é: " + mediaprova);
        System.out.println(" A média dos trabalhos é: " +  mediatrabalho);
 
    }
 
}