{"id":936,"date":"2024-12-29T09:00:00","date_gmt":"2024-12-29T08:00:00","guid":{"rendered":"https:\/\/jorgeturiel.es\/?p=936"},"modified":"2024-12-07T21:08:41","modified_gmt":"2024-12-07T20:08:41","slug":"ejercicio-programacion-5-contrasena-correcta-compruebalo-y-obten-acceso","status":"publish","type":"post","link":"https:\/\/jorgeturiel.es\/?p=936","title":{"rendered":"Ejercicio programaci\u00f3n #6. Contrase\u00f1a correcta. Compru\u00e9balo y obt\u00e9n acceso."},"content":{"rendered":"\n<p>En este <a href=\"https:\/\/www.youtube.com\/shorts\/8Rr2_M8x-OY\">v\u00eddeo<\/a>, crean un programa en Python para comprobar una contrase\u00f1a, y la comprueban, para obtener acceso.<\/p>\n\n\n\n<p>Vamos a verlo como se hace en Object pascal.<\/p>\n\n\n\n<!--more-->\n\n\n\n<p>Empezamos creando un nuevo programa.<\/p>\n\n\n<div class=\"wp-block-image\">\n<figure class=\"aligncenter size-full\"><img loading=\"lazy\" decoding=\"async\" width=\"338\" height=\"416\" src=\"https:\/\/jorgeturiel.es\/wp-content\/uploads\/2023\/03\/LazarusCrearProyecto.jpg\" alt=\"\" class=\"wp-image-386\" srcset=\"https:\/\/jorgeturiel.es\/wp-content\/uploads\/2023\/03\/LazarusCrearProyecto.jpg 338w, https:\/\/jorgeturiel.es\/wp-content\/uploads\/2023\/03\/LazarusCrearProyecto-244x300.jpg 244w\" sizes=\"auto, (max-width: 338px) 100vw, 338px\" \/><figcaption class=\"wp-element-caption\">Nuevo proyecto<\/figcaption><\/figure>\n<\/div>\n\n<div class=\"wp-block-image\">\n<figure class=\"aligncenter size-full\"><img loading=\"lazy\" decoding=\"async\" width=\"563\" height=\"334\" src=\"https:\/\/jorgeturiel.es\/wp-content\/uploads\/2023\/03\/LazarusEscogerProyecto.jpg\" alt=\"\" class=\"wp-image-388\" srcset=\"https:\/\/jorgeturiel.es\/wp-content\/uploads\/2023\/03\/LazarusEscogerProyecto.jpg 563w, https:\/\/jorgeturiel.es\/wp-content\/uploads\/2023\/03\/LazarusEscogerProyecto-300x178.jpg 300w\" sizes=\"auto, (max-width: 563px) 100vw, 563px\" \/><figcaption class=\"wp-element-caption\">Seleccionar tipo de proyecto<\/figcaption><\/figure>\n<\/div>\n\n\n<p>Escribe el siguiente c\u00f3digo.<\/p>\n\n\n\n<div class=\"wp-block-urvanov-syntax-highlighter-code-block\"><pre class=\"lang:default decode:true \" >program Project1;\n\n{$mode objfpc}{$H+}\n\nuses\n  {$IFDEF UNIX}\n  cthreads,\n  {$ENDIF}\n  Classes { you can add units after this },\n  SysUtils;\n\nConst\n  ContrasenaSegura :string = 'Segura123!';\n\n  Var\n    contrasena: string;\n  function Comprobar (Contrasena:String):string;\n  begin\n    if Contrasena = ContrasenaSegura then\n    begin\n       Result:= 'Acceso permitido';\n    end\n    else\n    begin\n      Result :='Acceso denegado';\n    end;\n  end;\n\nbegin\n  WriteLn('Introduce la contrase\u00f1a');\n  Readln(contrasena);\n  Writeln (Comprobar(Contrasena));\nend.<\/pre><\/div>\n\n\n\n<p>En la l\u00ednea 13 creamos un constante que almacenar\u00e1 la contrase\u00f1a correcta.<\/p>\n\n\n\n<p>En la l\u00ednea 14 definimos la variable que contendr\u00e1 la clave que introducir\u00e1 el usuario.<\/p>\n\n\n\n<p>Despu\u00e9s creamos un funci\u00f3n llamada <em>Comprobar<\/em> que recibe la contrase\u00f1a tecleada por el usuario la comprobar\u00e1 con la contrase\u00f1a correcta devolver\u00e1 una cadena de texto, indicando si tiene acceso o si el acceso ha sido denegado en funci\u00f3n de si contrase\u00f1a introducida es igual o no la contrase\u00f1a segura.<\/p>\n\n\n\n<p>Para terminar escribimos en la pantalla, un texto indicando al usuario que introduzca la contrase\u00f1a. <\/p>\n\n\n\n<p>La l\u00ednea 31 captura la contrase\u00f1a tecleada por el usuario.<\/p>\n\n\n\n<p>Por \u00faltimo escribimos en pantalla el resultado de llamar a la funci\u00f3n <em>Comprobar<\/em>, pasando como par\u00e1metro la contrase\u00f1a tecleada por el usuario.<\/p>\n\n\n\n<p>Saludos<\/p>\n","protected":false},"excerpt":{"rendered":"<p>En este v\u00eddeo, crean un programa en Python para comprobar una contrase\u00f1a, y la comprueban, para obtener acceso. Vamos a verlo como se hace en Object pascal.<\/p>\n","protected":false},"author":2,"featured_media":944,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[61,27,25],"tags":[64,23,21,24],"class_list":["post-936","post","type-post","status-publish","format-standard","has-post-thumbnail","hentry","category-free-pascal","category-lazarus","category-pascal","tag-ejercicio-programacion","tag-lazarus","tag-pascal","tag-programacion"],"_links":{"self":[{"href":"https:\/\/jorgeturiel.es\/index.php?rest_route=\/wp\/v2\/posts\/936","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/jorgeturiel.es\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/jorgeturiel.es\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/jorgeturiel.es\/index.php?rest_route=\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/jorgeturiel.es\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=936"}],"version-history":[{"count":6,"href":"https:\/\/jorgeturiel.es\/index.php?rest_route=\/wp\/v2\/posts\/936\/revisions"}],"predecessor-version":[{"id":945,"href":"https:\/\/jorgeturiel.es\/index.php?rest_route=\/wp\/v2\/posts\/936\/revisions\/945"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/jorgeturiel.es\/index.php?rest_route=\/wp\/v2\/media\/944"}],"wp:attachment":[{"href":"https:\/\/jorgeturiel.es\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=936"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/jorgeturiel.es\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=936"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/jorgeturiel.es\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=936"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}