Samarqand davlat universiteti amaliy matematika va informatika fakulteti informatikani o

Foydalanilgan adabiyotlar.

1. 
   Qobulov V.Q.Aql mo`jizasi. – T:Fan Toshkent. – 1984
   
2. 
   Jumanov I.I Mingboyev N.S. Informatika. Uslubiy qo`llanma. – Samarqand SamDU.-2002
   
3. 
   Numuhammedov T.A. IBM PC va MS DOC bilan ishlash – T: Fan Toshkent – 1995
   
4. 
   G`ulomov S.S Shermuhammedov A.T Begalov B.A Iqdisodiy Informatika. – T.: “O`zbekiston”, Toshkent – 1999
   
5. 
   Broydo V.L Ofis texnikasi (boshqarish va ish yuritish uchun) – T.:Mehnat, Toshkent – 2001
   
6. 
   Qobilov S.S Jumanov I.I SUBD I Informatsion Sistema – Samarqand SamDU.- 1997
   
7. 
   Aripov M. Intenet va electron pochta aloqasi. – T.: “Universitet”.- 2000
   
8. 
   Jumanov I.I Mingboyev N.S Hisoblash sistemalarining information asoslari. – Samarqand SamDU. – 2002
   
9. 
   G`ulomov S.S va boshqalar “Iqdisodiy Informatika”. – T.: Fan – 1999
   
10. 
    Rahmonqulova S.I IBM PC shaxsiy kompyuterda ishlash. - .:T Fan Toshkent 1999
    
11. 
    Nasretdinova Sh. Windows uchun Excel sahifalarida. – T.: Fan – 1999
    

Ilovalar

Vinejer usulika kodlangan dasturning ko’rinishi

Uses crt;

var a1: array [1..5] of integer; a,s,s1:string; k,m,i,j,n,n1:integer;

begin

a:='abcdefghijklmnopqrstuvwxyz';

write('shifrlanishi kerak matnni kiriting=');

readln(s);

write('kalit so`zni kiriting =');

readln(s1);

n:=length(s1);

n1:=length(s);

for i:=1 to n do

for j:=1 to 26 do

if s1[i]=a[j]

then begin a1[i]:=j; break end;

if n1 mod n <>0

then

write('shifrlanayotgan matn uzunligi kalit so`z uzunligiga karrali emas')

else

begin

for i:=1 to n1 do

begin

for j:=1 to 26 do

if s[i]=a[j]

then begin m:=j; break end;

k:=i mod n;

if k=0

then k:=n;

k:=a1[k]+m-1;

if k>26

then k:=k-26;

s[i]:=a[k];

end;

writeln(s);

for i:=1 to n1 do

begin

for j:=1 to 26 do

if s[i]=a[j]

then begin m:=j; break end;

k:=i mod n;

if k=0

then k:=n; k:=1-a1[k]+m;

if k<0

then k:=k+26;

s[i]:=a[k];

end;

write(s);

end;

end.

a хaqiqiy sоn bеrilgan. Quyidagi rasmlarda tasvirlangan y(x) funksiya uchun y(a) ni хisоblang.