Guia de Auto Estudo 3 - Explorando o Pascal

OBJETIVO

 

Escrever programas que utilizem construtos fundamentais (entrada e saída de dados). Aprender a utilizar o comando for e a estruturar e organizar uma tabela pelo programa Pascal.

 

Programa Fonte-Pascal

program aviaofernandamorais;

var   velocidade,i,x,k,tempo,tempof:integer;

v, a, m, d:real; {velocidadefinal,aceleracao,velocidadematch,deslocamento}

begin

            writeln('informe o indice de variação do tempo em s');

            readln(tempo);

            k:=tempo;

            writeln('informe a velocidade para o calculo da aceleraçao em m/s');

            readln(velocidade);

            writeln('informe o tempo final para a aceleracao em s');

            readln(tempof);

                 

                  x:=tempof div tempo;

                  a:= velocidade div tempo;

                        writeln('A sua aceleração é ',a,'m/s2');

                        write('Tempo decorrido   ');

                        write('Velocidade Final em km/h   ');

                        write('Velocidade Final em Match   ');

                        writeln('Deslocamento   ');

for i:=1 to x do begin

            write(tempo);

            v:= a * tempo * 3.6;

            m:= v/1224.0;

            d:=(v*(tempo/3600.0))/2;

            tempo:=tempo + k;

            write(v,'                ');

            write(m,'  ');

            writeln(d);

                        end;

                             end.

 

Print Screen Do programa fonte-Pascal

 

Exemplo de testes realizados

 

 Comentário

 

Houve a dificuldade no passo de organização e estruturação da tabela dentro do programa e dos resultados para cada coluna mesmo com auxilio do exemplo citado no guia de auto estudo e do livro recomendado. Porém por meio de varias tentativas, consegui atingir o resultado final do desafio e construí a tabela com todas as exigências propostas.