}

Programme de gestion des données d'un centre

1987/10/01 Arrojeria, Eustakio - Elhuyar Zientziaren Komunikazioa | Lizaso, Pili - Informatika SailaElhuyar Fundazioa Iturria: Elhuyar aldizkaria

L'exemple ci-dessous montre comment créer ce type de programme sur les ordinateurs qui n'ont pas d'ordre d'utilisation du fichier.

Planifier à l'ordinateur les programmes qui vont utiliser le fichier est l'un des problèmes les plus complexes. L'exemple ci-dessous montre comment créer ce type de programme sur les ordinateurs qui n'ont pas d'ordre d'utilisation du fichier.

Bien sûr, dans ces conditions, le programme sera limité. Mais d'autre part, c'est un exemple simple qui aide à prendre conscience de la possibilité de violer l'ordinateur pour effectuer de nouvelles tâches.

Ce programme contient un fichier simple avec les données d'un groupe d'élèves. Ces données sont de trois types:

    Nom et prénom
    Cours
  • Matières

Dans cet exemple, les matières en attente de l'élève ne sont pas prises en compte, bien que cette adaptation soit assez simple. Dans le programme explicatif, un groupe de dix élèves a été pris et leur adaptation ou adaptation consiste en la capacité de stockage du programme.

Les données sont stockées dans quatre tableaux:

    Matrice de noms et
    prénoms Matrice de cours
    Matrice de matières
  • Matrice des relations de noms et matières.

Dans les trois premières matrices sont stockées les données que le nom lui-même indique. La quatrième est une matrice bidimensionnelle dans laquelle un ensemble de zéros et certains indiquent les matières dans lesquelles chaque élève a été inscrit.

Les tableaux utilisés dans cet exemple sont:



1 LOT DE DEUX ANS DE DEUX ANS
380 GOSUB 1010 : EXÉCUTE
390 LOCATE 8,4 : PRINT "Connaissant une donnée"
400 LOCATE 9,4 : PRINT "."
410 GOSUB 1010 : EXÉCUTE POUR SUIVRE REM
420 CLS
430 LOCATE 11,5 : PRINT " COURS (1)"
440 LOCATE 13,5 : PRINT "
450 LOCATE 15,5 : PRINT " MATIÈRE (3) 13,5 : Quel entrée
460 données ? ", A
470 IF A 1 AND A 2 AND A 3 THEN 420
480
IF A












=
1 THEN 630
490 IF
















=
2 THEN=770
500 CLS
510

LOCATE
: INPUT "Matière"; B$
520 CLS





















: PRATE CONOL

Gai honi buruzko eduki gehiago

Elhuyarrek garatutako teknologia