Turbo pascal

Aşağı Git Tüm Forumlar Web Tasarım - Programlama Yazılım Geliştirme Turbo pascal

Bu konudaki kullanıcılar: 1 misafir

5
Cevap 558
Tıklama 0
Öne Çıkarma

1. sayfa

Turbo pascal

Cevap Yaz

Floyt

21 yıl (32 mesaj)

Onbaşı

Konu Sahibi

integer bir ifadeyi nasıl tersten yazdırabilirim...

maskmack

21 yıl (1606 mesaj)

Yüzbaşı

programla.com'u öneririm...

Bu mesaja 1 cevap geldi.

system32

21 yıl (1784 mesaj)

Binbaşı

tersten kastın:

123456 yı 654321 şeklinde yazdırmak değil mi?
bi araştıralım bakalım

Bu mesaja 1 cevap geldi.

system32

21 yıl (1784 mesaj)

Binbaşı

program terstenyazma; 
  uses crt; {Windows için Wincrt}varmesaj:string;i,l:byte; 
  beginWrite('Bir mesaj yazınız');Readln(mesaj);l:=length(mesaj); 
  Writeln(L);for i:=L downto 1 doWrite(Copy(mesaj,i,1)); 
  End.

Bu işini görebilir sanırım

< Bu mesaj bu kişi tarafından değiştirildi system32 -- 9 Mayıs 2005, 17:30:22 >
Bu mesaja 1 cevap geldi.

maskmack

21 yıl (1606 mesaj)

Yüzbaşı

kusura bakma.
www.programlama.comü
Özürdilerim.

Bu mesaja 1 cevap geldi.

FreeStyla

21 yıl (454 mesaj)

Yüzbaşı

Önce string çevir integeri.
Sonra bi donguyle tersten yazabilirsin.
var a,c:integer; b:string; begin a:=123; str(a,b); for c:= length(b) downto 1 do write(b[c]); end.

str ile a değişkenin b nin içine attık.b nin uzunluğundan 1 e doğru azalan döngü açtık.
write(b[c]); ile sondan başa doğru yazdık.

Cevap Yaz

1. sayfa

Tüm Forumlar Web Tasarım - Programlama Yazılım Geliştirme Turbo pascal