Ver originales (Francés)

Revisión de ejercicios

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. bedia18
    gracias señor por su respuesta me conmoviste
    yo tomo la j como un entero
    y en la línea 11 incorporo la i porque según el ejercicio se trata de una matriz y el "i" representa las filas
    r
    si cometo errores por favor ayúdame a resolverlo