Pascal/Delphi ola esse exercicio que posso fazer amigos

[credson]

Elabore um algoritmo que possa descobrir, através de perguntas e respostas, qual meio de transporte o usuário está pensando.

O usuário deverá escolher uma das seguintes opções:

- Trator
- Moto
- Bicicleta
- Trem
- Carro
- Caminhão
- Ônibus
- Paraquedas
- Balão
- Avião
- Helicóptero
- Submarino
- Barco
- Navio
- Lancha

Para chegar ao resultado, só devem ser usadas perguntas que retornem "Sim" ou "Não".

Exemplo:
É terrestre? Sim.
Cabe apenas uma pessoa? Sim.
É pesado? Não.
Tem pedal? Sim.

[devair1010]

@credson    o Que você já fez desse exercício ?  ,   pois para ler o que for digitado no teclado você usará  a função readln ,  e para ver se acertou a resposta  use o comando  if .