Aprender programación en Pascal: Nivel básico

GIF Post patrocinado por @Caba-gamer : (Respondo Dudas en comentarios (Sobre programación)) ☩Caba Maestro☩ Toda la información es de mi autoria. Recuerden que todos los programa que realizaremos no fueron copilados por lo cual puede haber errores , (Muy probablemente) pero servirán de guía para quien los necesite. -Programo en Notepad++ por que en pascal es muy feo programar y es cansino para la vista -Para modificar Notepad++ Tenes que guardar el archivo en formato ".pas" y aparecerán los colores -Es ejecutable en Pascal (Con copy paste del Notepad++ o abriendo el archivo guardado en ".pas" Los programas que veremos hoy serán los básicos y consiste en una serie de ejercicios básicos al comienzo para mas info recomiendo usar los siguientes links: -http://wiki.freepascal.org/ => En esta pagina podremos encontrar ejemplos de todos los códigos que usaremos Y muchos mas. Luego es importante aclarar que tanto Notepad++ como Pascal (El copilador) es gratis. Estructuras Secuenciales Copypaste modificable Program Pasc2; {4.Escriba un programa donde por pantalla pida por medio de un mensaje que ingrese su nombre, y como salida tenga el siguiente mensaje "Su nombre es HHHHHH" (HHHHH es el nombre ingresado).} {5.Modifique el programa anterior de manera que se solicite el nombre a dos personas y aparezca un cartel que diga "Buenos días XXXXX y YYYYY .... ¿Comenzamos a trabajar?.} Uses dos,crt; Var Nombre:STRING[10]; Nombre2:STRING[10]; Begin Writeln('Ingrese su nombre:'); Readln(Nombre); Writeln('Ingrese el nombre de su amigo: '); Readln(Nombre2); {Writeln('Su nombre es: ',Nombre);} Writeln('"Buenos días ',Nombre,'y',Nombre2,'¿Comenzamos a trabajar?'); Readkey End. Copypaste modificable Program Tp3; {6.Escriba un programa al cual ingrese la velocidad de un movil expresada en metros por segundo e imprima en pantalla la velocidad en kilometros por hora.} {7.Modifique el programa anterior de manera tal que por pantalla aparezca el siguiente cartel. "Los XXX m/s equivalen a YYY Km/h" (Donde XXX es el valor ingresado e YYY es el resultado)} Uses Dos,crt; Var VMS:Real; VKH:Real; Begin Writeln('Escriba la velocidad del movil: '); Readln (VMS); VKH:= 36 * VMS ; {Como no recuerdo como escribir en fraciones lo resuelbo con lo siguiente capas sea 3,6 (y lo tome)} VKH:= VKH / 10 ; {Writeln('La velosidad del movil en sistema MKH es : ');} Writeln('Los',VMS,'m/s equivalen a',VKH,); Readkey End. Copypaste modificable program Tp4; {8.Un constructor sabe que necesita 0,5 metros cúbicos de arena por metro cuadrado de revoque a realizar. Hacer un programa donde ingrese las medidas de una pared (largo y alto) expresada en metros y obtenga la cantidad de arena necesaria para revocarla.} Uses dos,crt; Var Largo:Real; Alto:Real; Arena:REAL; Begin Writeln('Ingrese el Largo de la pared en metros: ' ); Readln(Largo); Writeln('Ahora ingrese el alto de la pares en metros: '); Readln(Alto); Largo:= Alto*Largo; {seria mejor usar una variable llamada pared mas comodo} Arena:= 0,5 *Largo; Writeln('Debera usar',Arena,'para revocarla'); Readkey End. Estos van a ser una serie de post con bastantes ejercicios lo tengo que poner por partes aprender a programar no es magia, sentarte a hacer las cosas Agradecería que Valoraran el Esfuerzo tanto como si les fue o no útil Espero que les sirva el pascal ya no se usa para nada , recomiendo empezar con C pero el pascal también es valido y se me antojo este total muchas cosas se comparten otras no. Gracias Y recuerden Dudas solo por comentarios No mp. GIF ☩Finéis educativos☩