قسم الرياضيات و الإعلام الإلي

www.univ-soukahras.dz/ar/dept/mi

المقياس: Algorithmique et structure de données 1

  1. معلومات
  2. الأسئلة
  3. التعليم عن بعد

Ce menu déroulant, qui peut le faire!?

1 votes

Bonjour à tous,

Pour mieux présenter vos programmes nous avons vu comment inserer le tout dans un menu simple. Maintenant l'utilité d'un menu étant acquise, mieux vaut le perfectionner.

Utiliser le commandes de la bibliothèque CRT.TPU pour faire un menu déroulant: Readkey, Textcolor, textbackground, gotoxy, chr ... etc.

Bon courage.

نشر على 12:37, الاثنين 20 نوف 2017 By Noureddine GASMALLAH
In Algorithmique et structure de données 1


أجوبة (4)




جواب (1)

0 votes

mesieu le procedure CRT :face lecren noir de lecxution

 

نشر على 13:25, الاثنين 20 نوف 2017 by halima dridi (35 points)
In Algorithmique et structure de données 1



جواب (2)

0 votes

Program serie 5 ;

Uses crt ;

Var  ch :integer ;

        Touche:char;

Begin

Textbackground(black);

Ch:=1;

Touche:=’1’;

Repeat

 Clrscr;

Textbackground(white); Textcolor(black);

Writeln(‘┌──────────────────┐’); write(‘│’);

If touche =’1’  then

Textbackground(yellow);

Write(‘Nombre positif ou négatif ‘) ;

Textbackground(white); writeln(‘│’);

 

Write(‘│’) ;

If touche =’2’  then

Textbackground(yellow);

Write(‘Exercice 2 ‘) ;

Textbackground(white); writeln(‘│’);

 

Write(‘│’) ;

If touche =’3’  then

Textbackground(yellow);

Write(‘Produit positif ou négatif ‘) ;

Textbackground(white); writeln(‘│’);

 

Write(‘│’) ;

If touche =’4’  then

Textbackground(yellow);

Write(‘Ordre alphabétique‘) ;

Textbackground(white); writeln(‘│’);

Writeln(‘└──────────────────┘’);

 

If (touche<>1) and (touche<>2) and (touche<>3) and (touche<>4) then

Begin

Textcolor(red);

Writeln(‘Entrer correct touche);

End;

Textbackground(black);

Touche:=readkey;

Until ch:=5;

Readln;

End.

نشر على 20:51, السبت 25 نوف 2017 by Islam Yagoub (74 points)
In Algorithmique et structure de données 1



جواب (3)

0 votes

Monsieu je compris pas le vit de crt

نشر على 19:39, الثلاثاء 5 ديس 2017 by Yousra Sebouai (90 points)
In Algorithmique et structure de données 1



جواب (4)

0 votes

Je ne comprend pas monsieur

نشر على 16:53, الاثنين 18 ديس 2017 by abla ben khaled (32 points)
In Algorithmique et structure de données 1



هل لديك جواب ?