Program zamieniający mały litery na wielkie [Pascal/C++]

program zamianaliternaduze;





var



  wyraz, nwyraz : string;

  a, l : char;

  n : byte;

  dlugosc, i : integer;



begin



  writeln('Podaj wyraz:');

  readln(wyraz);

  dlugosc:=length(wyraz);



  for i:=1 to dlugosc do

    begin

      a:=wyraz[i];

      n:=ord(a);



        if (n >= 97) and  (n <= 122) then

          begin

            n:=n-32;

          end



        if (n >= 65) and (n <=122) then

          begin

            l:=chr(n);

            nwyraz:=nwyraz+l;

          end;



    end;



  writeln;

  writeln('Nowy wyraz to: ', nwyraz);

  readln;



end.

int toupper(int c);

#include <iostream>

#include <cctype>



using namespace std;



int main()

{

  char ch;



  cout<<"Wpisz tekst: ";

  cin>> ch;



  

  ch = toupper (ch);

  cout<<ch;

  

  getchar();

  cin.get();

}

#include <iostream>

#include <cctype>



char c;

while (std::cin >> c) {

    std::cout << (char)std::toupper(c);

}

#include <iostream> 

#include <cctype> 



using namespace std; 



int main() 

{ 

  char ch; 

  string tekst;

  string ntekst;

  int dlugosc;

  

  cout << "Wpisz tekst: "; 

  cin >> tekst;

  

  dlugosc = tekst.length();

  

  for(int i=0; i<=dlugosc-1; i++)

  {

  ch = tekst[i];

  ch = toupper(ch);

  ntekst = ntekst + ch;

  } 



  cout << ntekst;



  getchar();

  cin.get();

}

#include <string>

#include <iostream>



std::string napis;

std::getline(std::cin, napis); // wczytaj cały wiersz do napisu

#include <iostream>    

#include <cctype> 



using namespace std; 



int main() 

{ 

  char ch; 

  string tekst;    

  string ntekst;

             

  cout << "Program zmieniajacy wprowadzony tekst na duze litery." << endl << endl;

  

  cout << "Wpisz tekst: " << endl;

  

  std::getline(std::cin, tekst);

  

  for(int i=0; i<=tekst.length()-1; i++) 

  {    

  ch = tekst[i]; 

  ch = toupper(ch);    

  ntekst = ntekst + ch; 

  }    

  

  cout << ntekst << endl;   

  cin.get(); 

}