Genel
Parasıyla VB, Mikroişlemci, Delphi, Pascal Sınav Sorularımı Çözecek Olan?
Parasıyla VB, Mikroişlemci, Delphi, Pascal Sınav Sorularımı Çözecek Olan?
-
JuBa55 bunu yazdı:
-----------------------------
naptın sen who :) ne 400 500 ü işler den dolayı son güne kaldı sorular da işyerinde yarın sabah yazacam yardım edecek olursa hakkını ödicem
-----------------------------
sen bilirsin. -
WH0 bunu yazdı:
-----------------------------ödev cewaplari team viewer ile gösterilir sonrada ödeme alindiktan sonra msn / Adrese Kargo ile CD veya email olarak gönderilir.
-----------------------------hoca fatura kesiyon mu bari :)
-
faturada keserim problem olmaz da :D photoshop keygeni virus yayior benimkinin de lisansi bitik :D
paint ile olabildiğince güzzelini yaparm:D sana özel -
konuyu amacından sapıtıp mevzuyu uzatmak istemem arkadaşa ayıp oluyor , pm den falan msn falan at halledelim senin photo shop sorunun (bedava + 0 TL diye faturada veririm :) )
-
no-violence bunu yazdı:
-----------------------------
konuyu amacından sapıtıp mevzuyu uzatmak istemem arkadaşa ayıp oluyor , pm den falan msn falan at halledelim senin photo shop sorunun (bedava + 0 TL diye faturada veririm :) )
-----------------------------
zaaa :D wh0 hadi gene iyisin :D:D:D
-
arkadaşlar sınav kağıtlarını yarın teslik edecem hala yapamadım pascal sorularını yazıyorum yardımcı olabilecek olursa çok sevinirim
1-klavyeden girilen bir metni kabul edip yine klavyeden girilen bir değeri şifre ile karşılaştırıp doğruysa girilen sayının kaç basamaklı bir sayı olduğunu ekrana yazdıran pacal programını yazınınz
2-klavyeden girilen bir metin içerisine yine klavyeden girilen karakterin kaç kere yer aldığını ekrana yazdıran programın pascal kodlarını yazınız
3- klavyeden girilen miktardaki sayıyı kullanıcıdan alarak kullanıcının girdiği sayıların en büyüğünü dizi değişken kullanarak bulup ekrana yazdıran programın pascal kodlarını yazınız
4- aşağıdaki pascal programlarının nme işe yaradfığını açıklayınız
a)
uses crt;
var
i,j:byte;
begin
for i:=1 to 4 do
begin for j:=4 downto 1 do
begin
writeln(i*j);
end;
writeln
b)
uses crt; (windows için winert)
const
aylar:array[1..12] of string[7]=
('ocak','şubat','mart',.......'aralık';
var
k:integer;
begin
clrscr;
wtire('.......ay:');
readln(k);
write('..........:'.aylar[k]); -
bilsem bedavaya yapardım vallah :)
alt tarafı yazılı sorusu
-
Her önüne gelen ünive girmeye kalkıp bi şekilde girerse sonuç böyle olur :S
-
JuBa55 bunu yazdı:
-----------------------------
-----------------------------sanırım a da
böle bişey yapıyor
1*4
1*3
1*2
1*1
2*4
2*3
2*2
2*1
.....
yani bu işlemrin sonucu ekrana yazdırıyor
b de de sanırım ayın sayısını giriyorsun
onu hangi ay olduğunu yazıyor :S