program moadleharf;
 uses wincrt;
  var n:integer;
    
       begin
        writeln('please enter a num 2 raghami:');
         readln(n);
          if((n>64) and (n<91)) or ((n>96) and (n<123))  then
            writeln(char(n))
             else
              writeln('error');
       end.

program adadehaval;
  uses wincrt;
   var a,b,i,j,m,n,sum:integer;
       l:byte;
       label k;
      begin
          writeln('please enter some number:');
          readln(a);
             writeln('please enter some number:');
          readln(b);
          if (a>b) then
           begin
             m:=a;
             n:=b;
           end;
          if (a            begin
             m:=b;
             n:=a;
          end;   
          sum:=0;
          while (a>0) do
                begin
                   if(a>m) then m:=a;
                   if(a                   writeln('please enter num:');
                   readln(a);
                end;                       
                   for i:=n to m do
                       begin
                         l:=0;
                         for j:=2 to i div 2 do
                             begin
                              if(i mod j=0) or (i=2) then
                                 begin
                                   l:=1;
                                                              
                                 end;
                              end;                                               
                      if (l=0) then sum:=sum+1;
                

                  end;
                  writeln('sum=',sum);                    
           
         end.  
           
             

افرادیکه مایلند به ایشون کمک کنند میتونن فرم مربوطه را بعداز تکمیل به آدرس زیر میل کنند :

fhthesis@yahoo.com

به اطلاع دانشجویان واحد دانشستان می رساند که آخرین مهلت تحویل مدارک به مراکز دانشگاه پیام نور تا روز یکشنبه مورخ ۲۵/۹/۱۳۸۶ می باشدُ ضمناْ دانشجویانی که درخواست تطبیق واحد را دارند فرم تطبیق واحد را تکمیل نموده و کارنامه را به دانشگاه جامع پیام نور استان تا روز یکشنبه مورخ ۲۵/۹/۱۳۸۶ تحویل نمایند

از آنجائیکه این وبلاگ به منظور اطلاع رسانی و تبادل اطلاعات بین دانشجویان فن آوری اطلاعات دانشگاه پیام نور بوجود آمده و با توجه به اینکه اطلاع رسانی از این طریق ملموس تر از Group یا همان گروهه بنابراین از دوستائی که مایلند به عنوان نویسنده در این وبلاگ همکاری کنند خواهش میکنم تقاضاشونو به آدرس پست الکترونیکی زیر بفرستن تا به عنوان نویسنده وبلاگ با همدیگه همکاری خوبی داشته باشیم .

It2Pnu@gmail.com

قبلا از حسن همکاری شما تشکر می کنم .(موفق باشید)

فقط به توضیحات زیر توجه کنید :

ابتدا فرم امضاء تعهد را آماده کرده و امضاء کنید،سپس اسکن آن را در قسمت فرم امضاء تعهد ارسال کنید

درصورتی که می خواهید از فرم مرخصی تحصیلی استفاده کنید باید شهریه ثابت را پرداخت کرده و فیش آن را در فرم ارسال نمایید

درصورتی که می خواهید از فرم انصراف دائم از تحصیل استفاده کنید باید هیچگونه بدهی به دانشگاه نداشته باشید

در ضمن درخواست فرم تطبیق واحد هم از گزینه هائی که تو لینک موجود هست ولی من نتونستم درخواستمو بفرستم مثل اینکه فعلا کارشون تکمیل نشده .