پاورپوینت نمايش عدد زوج به صورت جمع دو عدد اول (pptx) 21 اسلاید
دسته بندی : پاورپوینت
نوع فایل : PowerPoint (.pptx) ( قابل ویرایش و آماده پرینت )
تعداد اسلاید: 21 اسلاید
قسمتی از متن PowerPoint (.pptx) :
مطالب امروز
يک مثال از تابع
تعريف يک رشته در برنامه
توابع و پروسيجرهای رشته ها
چند مثال
عملگرهای رشته ها
رشته به عنوان آرايه ای از کاراکتر
آشنايي با چند دستور ديگر
نمايش عدد زوج به صورت جمع دو عدد اول
Function Prime ( n : Word ) : Boolean;
Var
b : Boolean;
I : Integer;
Begin
b := True;
For i := 1 To Trunc ( sqrt (n) ) Do
If n mod I = 0 Then b := False;
Prime := b;
End;
نمايش عدد زوج به صورت جمع دو عدد اول
Var
I , n : Word
Begin
Readln (n);
For I := 1 To n Do
If ( Prime ( I ) ) and ( Prime ( n-I ) ) Then
Write ( I , n-I );
End.
تعريف يک رشته
Var
نام رشته : String ;
مثال
Var
s1 , s2 , s3 : String;
Begin
s1 := ‘Hello’ ;
Readln ( s2 ) ;
s3 := s1 + s2 ;
Writeln ( s3 ) ;
End.
Length
Begin
Writeln ( Length ( ‘Hello’ ) );
Writeln (Length ( ‘’ ) );
End.
Length ( Str ) ;
طول رشته را تعيين می کند.
Pos
Begin
Writeln ( Pos ( ‘is’ , ‘IT is a book’ ) );
Writeln ( Pos ( ‘it’ , ‘IT is a book’ ) );
End.
Pos ( SubStr , MainStr ) ;
اگر زيررشته در رشته اصلی وجود داشته باشد، محل آن را تعيين می کند. اگر چندین زیر رشته مشابه وجود داشته باشد اولین زیر رشته مورد توجه قرار میگیرد.
اگر هیچ زیر رشته ای وجود نداشته باشد خروجی آن صفر است.
Copy
Begin
Writeln ( Copy ( ‘This is a book’ , 6 , 2 ) );
Writeln ( Copy ( ‘This is a book’ , 1 , Length (‘This is a book’) ) );
Writeln ( Copy ( ‘This is a book’ , 1 , Pos (‘ ‘ , ‘This is a book’) - 1 ) );
End.
Copy ( Str , Start , Number) ;
قسمتی از رشته را که از کاراکتر شماره Start شروع می شود و به تعداد Numer کاراکتر دارد را بر می گرداند.