Programation Avec Turbo Pascal

Résolu/Fermé
moomen - Modifié par moomen le 29/12/2010 à 17:35
 moomen - 29 déc. 2010 à 17:34
Bonjour,

Alors voila, je débute en pascal et je commence a comprendre le langage pascal et ses commandes bref maintenant j'essaye de faire un programme du genre:

program verber ;
uses wincrt ;
var
A : string[255] ;
begin
Writeln('give me your "IRREGULAR VERBE"');
read(A);
if
A=('awake')
then
Writeln('SIMPLE PAST : "awoke" / PAST PARTICIPLE : "awoken"');
if
A=('be')
then
Writeln('SIMPLE PAST : "was_were" / PAST PARTICIPLE : "been"');
if
A=('bear')
then
Writeln('SIMPLE PAST : "bore" / PAST PARTICIPLE : "born"');
if
A=('beat')
then
Writeln('SIMPLE PAST : "beat" / PAST PARTICIPLE : "beat"');
if
A=('become')
then
Writeln('SIMPLE PAST : "became" / PAST PARTICIPLE : "become"');
if
A=('begin')
then
Writeln('SIMPLE PAST : "began" / PAST PARTICIPLE : "begun"');
if
A=('bend')
then
Writeln('SIMPLE PAST : "bent" / PAST PARTICIPLE : "bent"');
end.


Mais voila mon problème en faisant tout sa il faut penser que je ne vais pas redemarer l'exécutable à chaque fois que je veut essayer avec un autre verbe j'ai entendu parler d'une commande "repeat" mais je ne sais pas trop comment faire alors si quelqu'un pourrait m'aider ça ne serais pas de refus. Merci d'avance

A voir également:

1 réponse

Merci de m'aider le plus vite possible j'ai un projet à préparer ^_^
0