رفتن به مطلب
ایران سی اف سی

اموزش پاسکال درس 6

امتیاز دادن به این موضوع:


king75

براي جلوگیری از تکراری شدن تاپیک ها قبل از ارسال از قسمت جستجوی سایت استفاده کنید. تاپیک های تکراری حذف خواهند شد.

تاپیک ها باید در انجمن های مناسب زده شوند. قبل از ارسال تاپیک عنوان انجمن را بخوانید.

ارسال‌های توصیه شده

مثال :

برنامه ای بنويسيد که N را از ورودی بگيرد و نتيجه اين سری را محاسبه كند .

1+2+3+4+....+N

;program seri

;Uses WinCrt

var

;i,m,n : integer

begin

;('writeln('Enter one number

;(readln(n

;m:=0

for i:=1 to n do

begin

;m:=m+i

;end

;(writeln('Enter one number:',m

.End

مثال:

برنامه ای بنويسيد كه اسامی ۱۰ نفر را بگيرد و آن كدام كه حرف اولش (با توجه به ترتيب حروف الفبای انگليسی) بزرگتر است را چاپ كند .

;program biger name

;uses wincrt

var

;n,s1,s2,s3,s4,s5,s6,s7,s8,s9,s10:string

begin

;('writeln('Enter Name

;(readln(s1,s2,s3,s4,s5,s6,s7,s8,s9,s10

if s1<n then

begin

;n:=s1

;end

if s2<n then

begin

;n:=s2

;end

به اين ترتيب تا s10 می نويسيم

;(writeln('n=',n

.end

در درس بعد از مثالی با شرح زير را برای شما می نويسم ولی شما سعی كنيد تا خودتان آن را بنويسيد . نتيجه را به من ايميل بزنيد تا ايرادهاي آن را به شما بگويم .

مثال درس بعد :

برنامه ای بنويسيد كه مرتبا حروف را از كاربر بگيرد و اگر حرف مورد نظر Q بود از برنامه خارج شود .

گرافیک ج سی

www.graphicgc.com

لینک به دیدگاه
به اشتراک گذاری در سایت های دیگر

  • پاسخ 0
  • ایجاد شده
  • آخرین پاسخ

بیشترین ارسال‌ها در این موضوع

روزهای محبوب

بیشترین ارسال‌ها در این موضوع

روزهای محبوب

در تاپیک ها، اگر سوال يا نظر خاصي نداريد لطفا فقط از دکمه می پسندم و ... استفاده کنيد. نظراتي مانند مرسی، خوب بود، ممنون و ... شامل اسپم هستند و باعث کاهش کيفيت پست ها مي شوند.

بالا آوردن تاپیک ها و پست ها قبل از 48 ساعت ممنوع است و موجب حذف آنها خواهد شد.

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

به گفتگو بپیوندید

هم اکنون می توانید مطلب خود را ارسال نمایید و بعداً ثبت نام کنید. اگر حساب کاربری دارید، برای ارسال با حساب کاربری خود اکنون وارد شوید .

مهمان
ارسال پاسخ به این موضوع ...

×   شما در حال چسباندن محتوایی با قالب بندی هستید.   حذف قالب بندی

  تنها استفاده از 75 اموجی مجاز می باشد.

×   لینک شما به صورت اتوماتیک جای گذاری شد.   نمایش به صورت لینک

×   محتوای قبلی شما بازگردانی شد.   پاک کردن محتوای ویرایشگر

×   شما مستقیما نمی توانید تصویر خود را قرار دهید. یا آن را اینجا بارگذاری کنید یا از یک URL قرار دهید.

×
×
  • اضافه کردن...

اطلاعات مهم

لطفا قبل از عضویت و همکاری با ما قوانین را مطالعه کنید.