{"id":926,"date":"2024-11-24T14:35:37","date_gmt":"2024-11-24T13:35:37","guid":{"rendered":"https:\/\/jorgeturiel.es\/?p=926"},"modified":"2024-11-24T21:01:19","modified_gmt":"2024-11-24T20:01:19","slug":"ejercicio-programacion-4-crea-un-cronometro","status":"publish","type":"post","link":"https:\/\/jorgeturiel.es\/?p=926","title":{"rendered":"Ejercicio programaci\u00f3n #4. Crea un cron\u00f3metro"},"content":{"rendered":"\n<p>En este <a href=\"https:\/\/www.youtube.com\/shorts\/rx_nfobwjnk\">v\u00eddeo<\/a>, crean un cron\u00f3metro que mida el tiempo entre dos pulsaciones de la tecla enter usando Python.<\/p>\n\n\n\n<p>Vamos a ver como se hace en Object pascal.<\/p>\n\n\n\n<!--more-->\n\n\n\n<p>Empezamos creando un programa nuevo.<\/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\" \/><\/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\n  { you can add units after this },\n  sysutils;\n\nvar\n  TiempoInicio, TiempoFinal, Diferencia: TDateTime;\nbegin\n  Writeln ('Pulsa enter para comenzar');\n  ReadLn;\n  TiempoInicio := Time();\n  WriteLn('Pulsa enter para terminar');\n  ReadLn;\n  TiempoFinal := Time();\n  Diferencia := TiempoFinal-TiempoInicio;\n  WriteLn(TimeToStr(Diferencia));\n  ReadLn;\n\nend. <\/pre><\/div>\n\n\n\n<p>En la l\u00ednea 11, a\u00f1adimos la clausula <em>systutils<\/em>. <\/p>\n\n\n\n<p>Escribimos un mensaje y esperamos a una a que pulse la tecla <em>enter<\/em>.<\/p>\n\n\n\n<p>En la l\u00ednea 18, guardamos la fecha y la hora actual en la variable <em>TiempoInicio<\/em>.<\/p>\n\n\n\n<p>Mostramos un mensaje un mensaje, y volvemos a esperar a que pulse la tecla <em>enter<\/em> el usuario.<\/p>\n\n\n\n<p>En la l\u00ednea 21 guardamos de nuevo el la fecha y la hora actual, en la variable <em>TiempoFinal<\/em>.<\/p>\n\n\n\n<p>En la l\u00ednea siguiente obtenemos la diferencia en ambas variables. Guardando el resultado en la variable <em>Diferencia<\/em>.<\/p>\n\n\n\n<p>Y por \u00faltimo mostramos el valor por pantalla, usando la funci\u00f3n <em>TimeToStr<\/em> para que se muestre en formato texto.<\/p>\n\n\n\n<p>Saludos<\/p>\n\n\n\n<p><\/p>\n","protected":false},"excerpt":{"rendered":"<p>En este v\u00eddeo, crean un cron\u00f3metro que mida el tiempo entre dos pulsaciones de la tecla enter usando Python. Vamos a ver como se hace en Object pascal.<\/p>\n","protected":false},"author":2,"featured_media":942,"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-926","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\/926","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=926"}],"version-history":[{"count":5,"href":"https:\/\/jorgeturiel.es\/index.php?rest_route=\/wp\/v2\/posts\/926\/revisions"}],"predecessor-version":[{"id":931,"href":"https:\/\/jorgeturiel.es\/index.php?rest_route=\/wp\/v2\/posts\/926\/revisions\/931"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/jorgeturiel.es\/index.php?rest_route=\/wp\/v2\/media\/942"}],"wp:attachment":[{"href":"https:\/\/jorgeturiel.es\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=926"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/jorgeturiel.es\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=926"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/jorgeturiel.es\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=926"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}