Informatică, întrebare adresată de dicusarcolea, 8 ani în urmă

elaborati un program pascal care afiseaza pe ecran codurile caracterelor citite de la tastatura


GreenEyes71: Care coduri ?
ronzigames: Codurile de la tastura
GreenEyes71: Nu, sunt codurile ASCII, așa ar fi trebuit să fi scris în enunț.
ronzigames: Această aplicație va citi caractere de la tastatură, unul câte unul, și le va afișa codurile ASCII corespunzătoare. Dacă tastați "Enter", programul se va încheia. Da asa cum ai spus tu
GreenEyes71: De ce nu ai scris enunțul exact așa cum apare în manual/culegere ?

Răspunsuri la întrebare

Răspuns de ronzigames
0

Răspuns:

Sper ca te-am ajutat! Codul a fost scris in limbajul de programare "pascal"

Explicație:

program afisare_coduri_caractere;

{Programul afişează codurile caracterelor citite de la tastatură.}

uses crt;

var

 ch: char;  {variabilă pentru caracterul introdus de la tastatură}

begin

 writeln('Introduceți caractere la tastatură. Pentru a opri programul, apăsați tasta "Enter".');

 ch := readkey;  {citirea unui caracter de la tastatură}

 while ch <> #13 do  {cât timp caracterul introdus nu este "Enter"}

 begin

   writeln(ch, ' are codul ', ord(ch));  {afişarea caracterului şi a codului său ASCII}

   ch := readkey;  {citirea următorului caracter}

 end;

end.

Răspuns de cimpoidorin
0
program AfisareCoduriCaractere;

var
c: char; // variabila in care vom citi caracterul de la tastatura

begin
writeln('Introduceti caractere la tastatura. Pentru a opri citirea, apasati tasta Enter.');

repeat
read(c); // citim un caracter de la tastatura
writeln(c, ' a codul ', ord(c)); // afisam caracterul si codul sau ASCII
until c = #13; // repetam citirea pana cand se introduce tasta Enter (cod ASCII 13)
end.
Alte întrebări interesante