-
Lenguaje
Pascal
-
Descripción
Calcular el número de segundos contenidos en un determinado número de días solicitados previamente.
1
2
3
4
5
6
7
8
9
10
11
12
13
2
3
4
5
6
7
8
9
10
11
12
13
program SegundosEnUnNumeroDeDias;
uses crt;
var numero_de_dias, numero_de_segundos : integer;
begin
write ('Ingresa el valor de numero de dias: ');
readln (numero_de_dias);
numero_de_segundos := numero_de_dias*24*60*60;
writeln ('Valor de numero de segundos: ', numero_de_segundos);
writeln;
write ('Presiona una tecla para terminar . . . ');
readkey;
end.
uses crt;
var numero_de_dias, numero_de_segundos : integer;
begin
write ('Ingresa el valor de numero de dias: ');
readln (numero_de_dias);
numero_de_segundos := numero_de_dias*24*60*60;
writeln ('Valor de numero de segundos: ', numero_de_segundos);
writeln;
write ('Presiona una tecla para terminar . . . ');
readkey;
end.