Ver originales (Francés)

Revisión de ejercicios

bedia18 -  
 bedia18 -
Hola, señor. Por favor, necesito ayuda para mi ejercicio; acabo de terminarlo y me gustaría tener un mentor para corregirme y explicarme mis posibles fallos.

Escribir un programa que permita llenar una tabla TAB de 20 elementos enteros cualquiera, no nulos. El programa deberá recorrer la tabla para buscar el elemento más grande.
TAF: Por favor complete todos los huecos con los valores que correspondan. NB: Todas las respuestas no deben tener espacios y deben estar en minúsculas.
Solución : 
 program tableau ; uses crt; type T_tab = array [ 1..20 ] of integer ; var tnbre : T_tab; i, j , grd : integer ; begin repeat writeln ( ‘ Entrez votre nombre : ‘) readln ( tnbre [i] ) ; until tnbre [i] > 0 grd := tnbre [1] for i:=2 to 20 do begin if ( grd > tnbre [i] ) them begin grd := tnbre [i] end ; end ; writeln('Le plus grand élément est :', grd); readkey; end .

5 respuestas

  1.
    jee pee Mensajes publicados 31883 Fecha de registro   Estado Moderador Última intervención   9 979
     
    Hola,

    Te has olvidado de especificar el lenguaje utilizado. Es fundamental ;-)

    Para futuros mensajes, recuerda utilizar las etiquetas de código. Un pequeño tutorial aquí https://codes-sources.commentcamarche.net/faq/11288-les-balises-de-code
    Arriba de la zona de edición de tus mensajes, hay iconos para enriquecer el texto. Aquella que tiene este aspecto 
    <>▼
    permite aplicar a los códigos el formato correspondiente a su naturaleza.

    Y cuando ejecutas tu código, ¿funciona, da mensajes de error, ... ?

    1