Pascal/Turbo Pascal - duda ejercicio 4

   
Vista:

duda ejercicio 4

Publicado por Erik Napster_EPD88@hotmail.com (73 intervenciones) el 14/03/2014 18:17:21
hola tengo la siguiente duda:

Te falta diseñar el programa principal. Debes llamar al procedimiento diseñado para comprobar su funcionamiento.

Cree un programa con un procedimiento que imprima una línea de una cierta longitud compuesta por un determinado carácter.
Para ello, el procedimiento de nombre línea, recibirá dos parámetros: el carácter que queremos imprimir, y el número de caracteres que queremos que tenga la línea.
Para probar ese procedimiento incluya ese procedimiento en un programa que pida la longitud y el carácter que queremos imprimir.

que es el siguiente programa:

1
2
3
4
5
6
7
8
9
program procedimiento;
 
procedure linea(c : char; veces : integer);
var
   u : integerñ
 begin
    for u := 1 to veces do
    write(c);
 end;

gracias de antemano
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

duda ejercicio 4

Publicado por ramon (2072 intervenciones) el 15/03/2014 00:44:59
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
program procedimiento;
var
   y : integer;
 
procedure linea(c : char; veces : integer);
var
   u : integer;
 begin
    for u := 1 to veces do
    write(c);
 end;
 
 begin
     for y := 1 to 4 do
     begin
     linea(´*´y);
     end;
 end.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar