CLS : OPTION BASE 1: INPUT "dizi eleman says = ", n
FOR x = 1 TO n
PRINT "A("; x; ")="; : INPUT "", a(x)
NEXT
FOR x = 1 TO n
b(x) = a(n + 1 - x)
PRINT "B("; x; ")="; b(x)
NEXT
QBasic Örnekler, QBasic Dökümanlar, QBasic Uygulamaları QBasic Kodlar, QBasic Dersler,QBasic Programlar, QBasic Ders Notları, QBasic Download, QBasic İndir
Kaydol:
Kayıt Yorumları
(
Atom
)
Hiç yorum yok :
Yorum Gönder