Pascal/Turbo Pascal - Se Debe utilizar PROCEDIMIENTOS, FUNCIONES

   
Vista:

Se Debe utilizar PROCEDIMIENTOS, FUNCIONES

Publicado por Camilo (10 intervenciones) el 21/07/2017 23:20:31
Alguien sabe como se hace en Pascal ?
Se Debe utilizar PROCEDIMIENTOS, FUNCIONES.

Escribir un programa en pascal, que lea un numero dado (introducido por teclado) la canción del elefante.:
“1 elefante se balanceaba sobre la tela de una araña. Como veía que no se rompía, fue a llamar otro elefante”
“2 elefantes se balanceaban sobre la tela de una araña. Como veía que no se rompía, fue a llamar otro elefante”
“3 elefante se balanceaba sobre la tela de una araña. Como veía que no se rompía, fue a llamar otro elefante”
“4 elefante se balanceaba sobre la tela de una araña. Como veía que no se rompía, fue a llamar otro elefante”
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

Se Debe utilizar PROCEDIMIENTOS, FUNCIONES

Publicado por ramon (2113 intervenciones) el 01/08/2017 23:41:02
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
{Mira esto}
 
 var
 n : integer;
 begin
 write(' Entre un numero del [1 al 4] : ');
 readln(n);
 writeln;
 case n of
 1 : begin
 writeln('un elefante se balanceaba sobre la tela de una arana. Como veia');
 writeln('que no se rompia, fue a llamar otro elefante');
 end;
 2 : begin
 writeln('un elefantes se balanceaban sobre la tela de una arana. Como ');
 writeln('veia que no se rompia, fue a llamar otro elefante');
 end;
 3 : begin
 writeln('un elefante se balanceaba sobre la tela de una arana. Como ');
 writeln('veia que no se rompia, fue a llamar otro elefante');
 end;
 4 : begin
 writeln('un elefante se balanceaba sobre la tela de una arana. Como ');
 writeln('veia que no se rompia, fue a llamar otro elefante');
 end;
 end;
 
 readln;
 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
Revisar política de publicidad