اقتباس:
المشاركة الأصلية كتبت بواسطة حذيفة بن اليمان
السلام عليكم ورحمة الله وبركاته
افتتحت هذا الموضوع الخاص بمادة Informatique
لكل من يجد صعوبة في حل أحد التمارين, يضعه هنا وأنا بإذن الله سأقوم بحل التمرين.
في الانتظار.
|
السلام عليكم
Soit le programme suivant :
Programme A
Program paM;
const
B=6;
var
a:integer;
c:boolean;
begin
a:=6.5;
B=B+a;
wrtieln(B);
if B>6 then C=B+3;
end.
Programme B
Program Map
var
b:integer;
Begin
A:boolean;
If A:=True then
b=b+1; else
b=b-1;
A=False;
end.
1) Détecter les erreurs au niveau des deux programme A et B.
2) Corrigez les programmes A et B.
3) Écrire un programme en pascal qui permet d’afficher les nombres impairs de 0 à 20