اكتب برنامج باستخدام لغة البرمجة باسكال pascal یقوم باستقبال احد الحروف التالیة ( W,G,B,Y,R ) ( حروف كبیرة) ثم یطبع
- برمجة باسكال pascal
- 2021-10-18
- mhanasmh00489829403
الأجوبة
program Exe15 (i,o);
var CH:CHAR;
begin
WRITELN('ENTER CHAR (R or Y or B or G or W)');
readln(CH);
case CH of
'R':writeln('RED');
'Y':writeln('YELLOW');
'B':writeln('BLUE');
'G':writeln('GREEN');
'W':writeln('WHITE')
else
writeln ('OUT OF RANG ');
END;
readln;
end. أسئلة مشابهة
القوائم الدراسية التي ينتمي لها السؤال
معلومات ذات صلة