Turbo pascal

moi ces charles je suis nouveau sur le forum et je veux apprendre tout sur la programation tel que vb et pascal

wa3, j'avais peur du devoir de synthèse, aidez moi, miciiiiii

je suis une élève en 2éme année secondaires section technologie de l'informatique, j'étudie 5 heures d'informatique, 3 heures programmations et 2 heures multimédia, on a déja appris tout sur les structures de données, le structures conditionnelles, les structures itératives, et enfin les fonctions et les procédures ( sous programmes), notre programme est très dense, les professeurs nous disent qu'il est très intéressant, comme vous savez c'est une nouvelle section basée sur les maths et les sc physique électroniques et next year nchalah ça sera 4h de programmation, 2h réseau en bac c'est bases de données, et 2h tic comme en bac, et en bac on va étudier le Java et le c, bon mais mnt je voulais bien vous communiquer, je suis douée en mes études , je px aider et en mme tps m'instruire de vous, merci a+

Salut Paley, alors comment se passe l'apprentissage du Turbo Pascal?

ok, tu as essayé de le lancer et taper un programme? Tu as besoin d'aide?

Petit tour rapide :
1) lancer Free Pascal
2) menu File -> New
3) tu tapes le programme et tu le sauve quelque part (menu File -> Save), fais attention au répertoire.
4) Compiler : Menu Compile -> Compile
5) Run pour l'éxecuter

Tu as installé FreePascal?

On prend le premier caractère du nom
t:=nom[1];

On mets le dernier caractère du nom à la place du premier
nom[1]:=nom[length(nom)];

On remplace le dernier caractère par le premier (qui est stocké dans t).
nom[length(nom)]:=t;

Ex: le nom est Laura

nom[1] = L
nom[2] = a
...
nom[5] = a

après la bidouille :

le nom est aaurL

Au fait, une chaîne, c'est un tableau de Char. Donc, c'est lié.

Une illustration des types String et Char : on veut stocker une seule lettre du nom.

Pour échanger la première lettre et la dernière lettre du nom :

program Salut;
uses crt, sysutils;

procedure syspause();
begin
 write('Appuyez sur ENTER...');
 readln();
end;

var nom: String;
var age: Integer;
var t: Char;
begin
 textcolor(15);
 write('Salut. Quel est votre nom ? ');
 readln(nom);
 write('Votre age? ');
 readln(age);

 textcolor(10);
 writeln('Bonjour ', nom, '! Vous avez ', age, ' ans.');
 writeln('Votre nom a ', length(nom), ' lettres.');

 t:=nom[1];
 nom[1]:=nom[length(nom)];
 nom[length(nom)]:=t;
 writeln(nom);
 syspause();
end.

d'accord je le ferai

pour plus d'amusement, il faut tenter de taper ce programme dans le compilateur pour essayer de le compiler toi même, le modifier etc

Bien! Tu as presque tout compris, à part :

textcolor n'utilise pas de tailles de polices, c'est une application console (un peu comme DOS). Le 15 c'est le code couleur (15= blanc, 10= vert).

Il ne dit pas le nombre de lettres de la phrase mais seulement du nom.

Et après, bah le sleep(5000) signifie qu'on attend 5 secondes (5000 millisecondes) pour quitter, comme ça on a le temps de lire.

Voici un exemple de Pascal, explique ce que fais ce programme :

indices :
write = écrire
writeln = écrire et aller à la ligne
readln = lire une ligne

program Salut;
uses crt, sysutils;

var nom: String;
var age: Integer;
begin

 textcolor(15); {en blanc}
 write('Salut. Quel est votre nom ? ');
 readln(nom);
 write('Votre age? ');
 readln(age);

 textcolor(10); {en vert}
 writeln('Bonjour ', nom, '! Vous avez ', age, ' ans.');
 writeln('Votre nom a ', length(nom), ' lettres.');
 {Attendre 5 secondes}
 sleep(5000);
end.

les espaces sont pris en compte avec la fonction len.

la fonction Len (elle existe dans presque tous les langages) te donne la longueur d'une chaine de caractères.

la fonction ShellExecute est dans le package Windows en Pascal. Ca doit fonctionner en mode console. Mais en Delphi, si je veux executer un programme externe (ex: la calculatrice), j'ai juste à taper :

WinExec('calc.exe',SW_SHOWNORMAL);

Il faut chercher la documentation de la fonction shellexecute en pascal, en mode console.

c'est ce que fait la commande exec (sous DOS seulement visiblement), après suivant les versions, il y a aussi ShellExecute etc. Vois si en ADA tu peux utiliser la fonction ShellExcute. Comme je fais du delphi principalement, j'utilise la fonction ShellExecute.

moi je programme en ada c asses proche du pascal, je c pas si tu connais ce language
mje suis etudiant et je suis entrain de realiser un projet (jeu morpion)
j'aimerai savoi si c possible de integrer dans mon programme ada (ou pascal) l'execution de commandes dos?

bien sûr ce site est public alors tout le monde peut y venir LOL

moi c'est charles je veux participer a votre forum car je veux tous apprendre sur pascal, vb et l'algo.

assez bien oui, je connais delphi, qui est basé sur pascal. Mais on trouve pas mal de cours sur le pascal sur le net.