عرض مشاركة واحدة
قديم 17-03-2009, 11:11 PM
  #16
achraf.mouni
مشرف قسم
الكمبيوتر وتطوير المواقع والانترنت
مشرف قسم
الرياضيات والإعلام الآلي
 الصورة الرمزية achraf.mouni
 
تاريخ التسجيل: 08-09-2008
الدولة: الجزائر
المشاركات: 2,439
achraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداعachraf.mouni عضو محترف الابداع
افتراضي

كذلك يمكنك استخدام if داخل if

كود:
كود بلغة HTML:
program Decisions; 

var 
i: Integer; 

begin 
Writeln('Enter a number'); 
Readln(i); 
if i > 0 then 
Writeln('Positive') 
else 
if i < 0 then 
Writeln('Negative') 
else 
Writeln('Zero'); 
end.
Case :

الامر Case يشبه إلى حد ما if لكنه يقبل العديد من الحالات مره واحده


كود:
كود بلغة HTML:
program Decisions; 

uses 
crt; 

var 
Choice: Char; 

begin 
Writeln('Which on of these do you like?'); 
Writeln('a - Apple:'); 
Writeln('b - Banana:'); 
Writeln('c - Carrot:'); 
Choice := ReadKey; 
case Choice of 
'a': Writeln('You like apples'); 
'b': Writeln('You like bananas'); 
'c': Writeln('You like carrots'); 
else; 
Writeln('You made an invalid choice'); 
end; 
end.
__________________
achraf.mouni غير متواجد حالياً  
رد مع اقتباس