ببخشید من متوجه نشدم که باید در یک رشته وارد بشه
در اینجا هم میشه از while استفاده کرد
به معنی و کاربرد "تا زمانی که"
ببخشید من متوجه نشدم که باید در یک رشته وارد بشه
در اینجا هم میشه از while استفاده کرد
به معنی و کاربرد "تا زمانی که"
it is ok
همینه....
سه تا while لازم هست...
حالا این whileها چیکارا میکرد رو دقیق یادم نیست.
آقا رضا اگه شما صورت مسئله اومد تو ذهنت بی زحمت بنویسش که من شبی بشینم تغییرش بدم ۴ تاش کنم که فردا صب بدم اینا ببرن دعات کنن...
---------- Post added at 05:58 PM ---------- Previous post was at 05:50 PM ----------
break از حلقه خارج میشه.
continue به اول حلقه میبرتت
قبل از اینکه شما پست بزنید خودم یادم اومد و پستم رو ادیت کردم...
---------- Post added at 06:29 PM ---------- Previous post was at 05:58 PM ----------
بیا اینم برا بقیه عمل ها ! مساله اینجاست ورودی که برنامه ما باید بگیره string هست که قابل محاسبه نیست.
البته این میتونی جزئی از برنامه بذاریم و بعد از اینکه عدد اول پیدا کردیم = a و عدد دوم رو = b و اپراتور هم که = op بذاریم که حلش کنه...
کد:uses crt; var a,b:real; op:char; begin clrscr; write ('please enter two number: '); readln (a,b); writeln; write ('please enter a operator: '); readln (op); writeln; case op of '+' : writeln ('sum: ',(a+b)); '-' : writeln ('subtract: ',(a-b)); '*' : writeln ('multiple: ',(a*b)); '/' : writeln (' divide: ',(a/b)); end; writeln; writeln ('Press Enter To Exit'); readln; end.
در حال حاضر 1 کاربر در حال مشاهده این موضوع است. (0 کاربران و 1 مهمان ها)