Tutorial de IF en PASCAL

-

INSTRUCCION IF PROGRAMACION PASCAL


Es la instruccion condicional mas usada en los diversos lenguajes de programacion, su formato completo y de trabajo en pascal es :
cargar o asignar la variable de condicion;
if condicion Then
begin
grupo cierto de instrucciones;
end
else
brgin
grupo falso de instrucciones;
end;
Primus.- Observar donde van y donde no van los puntos y comas;
Secundus.- Si un if no ocupa un grupo falso de instrucciones, entonces no se pone el else y el end antes del else si terminaria con punto y coma.
PROG2.pas 
program prog2;

uses crt;

var

edad:integer;

ciudad,nombre:string;

begin

clrscr;

(* area captura datos *)

gotoxy(20,5);write('dame nombre :');

readln(nombre);

gotoxy(20,6);write('dame ciudad :');

readln(ciudad);

gotoxy(20,7);write('dame edad :');

readln(edad);

(* area de condicion *)

if ciudad = 'tijuana' then

begin

edad:=edad*12;

gotoxy(20,10);write(nombre,' tienes ',edad,' meses');

end

else

begin

gotoxy(20,10);write('no cumple la condicion');

end;

readln; readln;

end.





IF PASCAL 



Comentarios

Publicar un comentario

Entradas más populares de este blog

Sacando aceleracion de un vehiculo en c++

-
Imagen
La palabra aceleración está presente en muchas situaciones de nuestra vida diaria, tanto es así que incluso uno de los pedales en el automóvil se llama “acelerador”. Siempre se utiliza asociada a un movimiento . Sin embargo, el significado que se le da habitualmente no corresponde exactamente al significado que se le da en Física. La aceleración mide directamente la rapidez con que cambia la velocidad. Si un vehículo se desplaza por una carretera, su velocidad varía  muchas veces durante el viaje; estos cambios en la velocidad se deben porque es imposible mantener una velocidad constante durante un trayecto  ya que pueden ocurrir situaciones que obliguen al conductor a aumentar la misma o a disminuirla. Por ejemplo, puede que el conductor deba frenar bruscamente en una situación de emergencia o bien puede que necesite aumentar la velocidad para adelantar a otro vehículo. En cualquiera de las dos situaciones, hay un cam...
Read more »

Ejemplo de suma Pascal

-
Imagen
Aquí muestro un ejemplo simple de suma en pascal en el cual pide introducir dos números para luego sumarlos y mostrar el resultado : Program P3AE4 (input,output); uses crt; Var num1, num2, total: Integer; Begin writeln('Suma'); writeln('Ingrese el primer numero:'); readln(num1); writeln('Ingrese el segundo numero:'); readln(num2); total:= num1+num2; writeln('El total de la suma es: ',total); readkey; End. Si quiere restar, multiplicar o dividir solo deberían cambiar el símbolo "+" por el deseado. Descargar código: link Turbo Pascal
Read more »

Gráfica de Seno y Coseno en C++ | Código C++

-
Imagen
para graficar por ejemplo la función seno, hacen falta 3 pasos: 1. Hacer un ciclo de 0 a 360º (con aumentos de 5 queda muy bien) con for, algo muy normal. 2. Calcular, obviamente, el seno de cada valor. Para esto la librería math.h nos regala la función sin(). Su uso es el obvio, pero el asunto es que todas las funciones trigonométricas que usa c++ trabajan en radianes. Es decir que primero tendremos que convertir nuestro ángulo en radianes y luego ya sacar el seno. Si la variable ‘i’ contiene el ángulo y tenemos ya definida la constante PI, la función quedaría así: sin(i/180*PI) 3. Luego viene la parte más rara, convertir ese valor en un entero que pueda meter como coordenada en un gotoxy. Si tenemos una variable int y y la igualamos a nuestra función anterior podría quedar bien si multiplicamos por 10: int x, y; y = sin(i/180*PI)*10; gotoxy(x,y); Nos quedaría nuestra gráfica en una escala 1:10, pero al correr el programa veremos que hay muchos valores de seno que ...
Read more »