Traduction en programme C

Fermé

HAFIDHOU - 12 sept. 2013 à 23:49
[Dal] Messages postés 6194 Date d'inscription mercredi 15 septembre 2004 Statut Contributeur Dernière intervention 11 octobre 2024 - 13 sept. 2013 à 00:46

Bonjour,
Qui peut me traduire ce programme Pascal en programme C?
Voici le programme:
Pascal

program cryptage?
uses wincrt?
var c:char?
e,m:integer?
begin writeln('entrer un caractere')?
readln(c)?
if c in ['A'..'B'] then
c:=pred (c)?
else if c in ['a'..'z'] then
c:= succ (c)
else if c in ['0'..'9'] then
begin
val(c,m,e)?
c:=chr(ord(9)m)?
end
else
c:=succ(succ(c)) ?
writeln(c) ?
end.

A voir également:

Traduction en programme C
Traduction photo gratuit - Guide
Programme demarrage windows 10 - Guide
Traduction créole guadeloupe français reverso ✓ - Forum Loisirs / Divertissements
Google traduction français arabe - Télécharger - Traduction

1 réponse

Réponse 1 / 1

[Dal] Messages postés 6194 Date d'inscription mercredi 15 septembre 2004 Statut Contributeur Dernière intervention 11 octobre 2024 1 092
13 sept. 2013 à 00:31

Salut,

ton programme Pascal, cela ne serait pas plutôt cela :

program truc;

uses
  Crt;

var
  c: char;
  e, m: integer;
begin
  Writeln('entrer un caractere');
  Readln(c);
  if c in ['A'..'B'] then
    c := pred(c)
  else if c in ['a'..'z'] then
    c := succ(c)
  else if c in ['0'..'9'] then
  begin
    val(c, m, e);
    c := chr(Ord(9) - m);
  end
  else
    c := succ(succ(c));
  Writeln(c);
end.

Dal

Miura564 Messages postés 13404 Date d'inscription dimanche 18 novembre 2012 Statut Membre Dernière intervention 2 février 2015 1 505
13 sept. 2013 à 00:32

c'est clairement plus lisible...

[Dal] Messages postés 6194 Date d'inscription mercredi 15 septembre 2004 Statut Contributeur Dernière intervention 11 octobre 2024 1 092
Modifié par [Dal] le 13/09/2013 à 00:46

oui... et il ya des chances que

  if c in ['A'..'B'] then

soit en réalité

if c in ['A'..'Z'] then

Discussions similaires

Traduction français vers créole guadeloupéen

Traduction du francais en créole martiniquais

"BONJOUR" : utilité de ce programme???

TV LG affiche le carré non programmé

Traduction du Français en Créole martiniquais