Soru:
arkadşlar çok acil yardm edin klavyedeb 2 ayrı diziye sayı
girilmektdir.girilen sayılarn toplamı 3.bir diziye aktarılıp aşağıdaki
şekilde yazdıran program?
dizi1 dizi2 toplam
——— ——- ———
7 10 17
80 5 85
‘ ‘ ‘
‘ ‘ ‘ die dwam edio..
Cevap:
-
uses crt;
-
var i, j, yedek :integer;
-
a:array[1..10] of integer;
-
b:array[1..10] of integer;
-
c:array[1..10] of integer;
-
begin
-
clrscr;
-
for i:=1 to 10 do
-
begin
-
write(i);
-
write(‘. sayıyı giriniz :’);
-
readln(a[i]);
-
end;
-
for i:=1 to 10 do
-
begin
-
write(i);
-
write(‘. sayıyı giriniz :’);
-
readln(b[i]);
-
end;
-
for i:=1 to 10 do
-
begin
-
c[i]:=a[i]+b[i];
-
end;
-
for i:=1 to 10 do
-
begin
-
writeln(c[i]);
-
end;
-
readkey;
-
end.
ne olur acil yardıma ihtiyacım var benim
ekrana bir metin giriliyor bu metnin kendi karakter sayısı kadar soldan saga dogru yazaman program yazın bunu nasıl yapıcam yardım edin
bana yardım edin yazılıdayım
çok zor bu ya :-x :sigh: :oops: :sad: :cry:
Arkadaşlar mantığını anlayın inanın program yazmak kolaylaşacaktır.
slm arkadaşlar pascaldan krkacak bişey yok sadece ezberlemeyin mantığını anlayınn mantığını anadıktan sonra çok kolay gelcek bende başlarda öleydim ama onra kndim program yazmaya başlayınca korkum gitti ilk sonav 100 şimdi kendi başıma program yazıyorum çok yardınmı olcak pascal size ben onun sayesinde çalışıyorum şimdi çalıştığım yerde sadee pascal kullanıyorum
çok ta zor değil be. :-) :!: :-?:
:oops: :oops: :oops: :oops:
ya bız daha gecmedık pascala cokmu zor :D
ya ben hiç bişey anlmıom bu pascaldan nasıl yapacmda bilmiom :sad: :oops:
ya ben pascaldan hç bişey anlmıom :oops: