Guia de Auto Estudo 3

No Guia de Auto Estudo 3 foi proposto:

1º. O desenvolvimento de um programa em PascaL para calcular a variação da velocidade de um avião e seu deslocamento para quaisquer velocidades, em quaisquer intervalos de tempo.

 Imagem do Programa em Pascal

Código do Programa em PascaL

program aviaopetrusluisdasilvagomesribeiro;
var velocidade,a,b,c,tempo,tempofinal:integer;
     velocidadefinal,aceleracao,velocidadematch,deslocamento:real;

begin

writeln('informe o indice de variação do tempo em s');
readln(tempo);
c:=tempo;
writeln('informe a velocidade para o calculo da aceleraçao em km/h');
readln(velocidade);
writeln('informe o tempo final para a aceleracao em s');
readln(tempofinal);
b:=tempofinal div tempo;
aceleracao:= (velocidade/3.6)/ tempo;
writeln('a sua aceleracao e ',aceleracao);
writeln('Tempo Decorrido*Velocidade Final (km/h)*Velocidade Final (Match)*Deslocamento (km)');
for a:= 1 to b do
 begin
  write(tempo);
  velocidadefinal:= aceleracao * tempo * 3.6;
  velocidadematch:= velocidadefinal/1224.0;
  deslocamento:= (aceleracao*(power(tempo,2))/2)/1000;
  tempo:= tempo + c;
  write(velocidadefinal,'   ');
  write(velocidadematch,'  ');
  writeln(deslocamento);
 end;

end.

Comentário

Nesse GAE foi necessário o conhecimento de fórmulas de Física realacionadas ao MRUV como a fórmula de aceleração e de distância. E foi necessário a criação de uma tabela para o agrupamento de um número infinito de informações e dados tornando o processo mais ágil.