yardım
1 den 50 ye kadar olan sayıların karelerini bulan program yazmam lazım lütfen yardım edin.
|
pascal ile yazılacak değil mi ?
|
valla excel olsa kolay :11: ben pascal bilmiyorum :11:
|
excel olmayacak pascal olması gerekiyor.Yardımlarınızı bekliyorum.
|
tamam hazırlanıyor. biraz bekle. ok ?? :1:
|
uses crt;
var i:longint; j,a:byte; begin clrscr; i:=0; for j:=1 to 50 do i:=i+j*j; writeln( i); readln; end. buyur umarım işini görür.. |
kısa bi fazlalık var..orda
uses crt; var i:longint; j:byte; begin clrscr; i:=0; for j:=1 to 50 do i:=i+j*j; writeln( i); readln; end. j,a:byte; orda a değişkeni tanımlamaya gerek yok .sanırım gözden kaçmış. kolay gelsin |
teşekkürler gökhan... :1:
|
çok teşekkür ederim çok sağolun :)
|
rica ederiz ne demek... :1:
|
Bütün Zaman Ayarları WEZ +3 olarak düzenlenmiştir. Şu Anki Saat: 19:09 . |
Powered by vBulletin® Version 3.7.0
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.