ne um contador de tempo

ola esto fazendo um curso tecnico que temos inicialisasao em robotica.nao vimos vb ainda e soi irei ver no semestre que vem o professor pediu para fazer um contador que mostre a hora inicial que o programa foi executado o tempo de duraçao e o tempo de termino ele pediu em pascal ao qual ja fiz em c que fiz e nao sei se ta serto e em vb que nao tenho naçao nem uma ate tentei fazer vendo umas apostilas mas coloquei a label e uma relogio e estrevi label1=timer e nao sei oq fazer alguem pode me ajudar ????vou colocar os codigos que ja fiz para verem que nao e preguisa pois se nao sei fazer nao tenho vergonha de pedir ajuda e se alguem quizer ajuda por msn me fala que ai vou fazendo conforme for falando ok . obrigado a todos.codigo pascalprogram ExercRobotica;uses dos;var hora,minuto,segundos,msegundos:word;i:real;beginGettime(hora,minuto,segundos,msegundos);writeln('Programa iniciado as :',hora,':',minuto,':',segundos,':',msegundos);while i<50000000 dobegini:=i+1;end;Gettime(hora,minuto,segundos,msegundos);writeln('Programa terminado as :',hora,':',minuto,':',segundos,':',msegundos);end.codigo c++ (nao sei se ta serto mas rodando ta hehehe)#include <time.h>#include <stdio.h>int main(){ long int cont; char timeStr; _strtime (timestr); printf ("O programa comecou a contagem as: \n",timestr); while (cont < 963214789) { cont=cont 1; } _strtime (timeStr); printf ("O programa terminou a contagem as: \n",timestr); getchar();}