GatoBooster

Ayudantía 17/03 part1

Mar 17th, 2017
93
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pascal 0.59 KB | None | 0 0
  1. Program HelloWorld(output);
  2. var :interger
  3.  
  4. //var a,b:real(números complejos)
  5. //var a:longint; (Almacena más datos pero ocupa más espacio)
  6. //writeln('(a+b):0:2') (es para limitar los decimales)
  7. begin
  8.   writeln('Hello, world!');
  9. end.
  10.  
  11. Program ContadordeCaracter(output);
  12.  
  13. var palabra:string;
  14.  
  15. begin
  16.    write('introduce palabra: ');
  17.    readln(palabra);
  18.    writeln(length (palabra));
  19. end.
  20.  
  21.  
  22. //var a,b:real(números complejos)
  23. //var a:longint; (Almacena más datos pero ocupa más espacio)
  24. //writeln('(a+b):0:2') (es para limitar los decimales)
  25. //n:=n/10; n mod 10; 35 mod 10 =
Add Comment
Please, Sign In to add comment