السلام عليكم
أريد منكم مساعدة صديقتي في حل هذه الحوارزمية في أقرب وقت ممكن
كتابة خوارزمية تخص جدول الضرب للعدد 4 بلغة الباسكال
بواسطة boucle وافضلها بال pour
Pour i allant de 1 à 10
Afficher b
b×i→b
ممكن شرح أكثر
program exo;
var n,i:integer;
begin
n=4;
for i:=0 to 9 do
begin
n:=n*i;
writeln(n);
end;
end.
var n,i:integer;
begin
n=4;
for i:=0 to 9 do
begin
n:=n*i;
writeln(n);
end;
end.
كود:
program multiplication4; var m,i :integer; begin for i:=1 to 9 do begin m:=i*4; writeln('4*',i,'=',m); end; readln; end.
النتيجة تكون:
4*1=4
4*2=8
.
.
.
4*9=36
بارك الله فيكم على مساعدتي
وجعلها الله في موازين حسناتك
INTEGER RESU=-n; // n et le nombre quand veut afficher
boucle for
deput boucle
resu=resu+n;
ecrit resu
fin boucle
——————-
exemple
n=4
resu=-4
boucle
resu=-4+4=0
incrementation
resu=0+4=4
incremantation
resu=4+4=8
incrementation