محبوبترینها
نمایش جنگ دینامیت شو در تهران [از بیوگرافی میلاد صالح پور تا خرید بلیط]
9 روش جرم گیری ماشین لباسشویی سامسونگ برای از بین بردن بوی بد
ساندویچ پانل: بهترین گزینه برای ساخت و ساز سریع
خرید بیمه، استعلام و مقایسه انواع بیمه درمان ✅?
پروازهای مشهد به دبی چه زمانی ارزان می‌شوند؟
تجربه غذاهای فرانسوی در قلب پاریس بهترین رستوران‌ها و کافه‌ها
دلایل زنگ زدن فلزات و روش های جلوگیری از آن
خرید بلیط چارتر هواپیمایی ماهان _ ماهان گشت
سیگنال در ترید چیست؟ بررسی انواع سیگنال در ترید
بهترین هدیه تولد برای متولدین زمستان: هدیه‌های کاربردی برای روزهای سرد
در خرید پارچه برزنتی به چه نکاتی باید توجه کنیم؟
صفحه اول
آرشیو مطالب
ورود/عضویت
هواشناسی
قیمت طلا سکه و ارز
قیمت خودرو
مطالب در سایت شما
تبادل لینک
ارتباط با ما
مطالب سایت سرگرمی سبک زندگی سینما و تلویزیون فرهنگ و هنر پزشکی و سلامت اجتماع و خانواده تصویری دین و اندیشه ورزش اقتصادی سیاسی حوادث علم و فناوری سایتهای دانلود گوناگون
مطالب سایت سرگرمی سبک زندگی سینما و تلویزیون فرهنگ و هنر پزشکی و سلامت اجتماع و خانواده تصویری دین و اندیشه ورزش اقتصادی سیاسی حوادث علم و فناوری سایتهای دانلود گوناگون
آمار وبسایت
تعداد کل بازدیدها :
1826593524
عیب یابی دستور -
واضح آرشیو وب فارسی:سایت ریسک: عیب یابی دستور bahar11 03 خرداد 1388, 15:39عیب یابی دستور با درود دو فایل با نامها و محتویات زیر داریم 1-t1.txt که درون ان سه خط زیر است a b c 2-t2.txt که درون ان سه خط زیر است d e f حالا میخواهم در فایل t3.text تمام حالات زیر را داشته باشم با دستور for ab-ac -ad-ba-bb-bcو...که کلا 27 خط می شود. ولی دستورات زیر این کار را انجام نمیدهند.لطفا راه حل صحیح را بگویید.ممنون s = 0 Open "t3.txt" For Output As #3 Open "t1.txt" For Input As #1 Open "t2.txt" For Input As #2 For i = m To n Line Input #1, m Line Input #2, n s = s + 1 Write #3, i Next Close 3 Text1.Text = s the_king 03 خرداد 1388, 22:50عیب یابی دستور با درود دو فایل با نامها و محتویات زیر داریم 1-t1.txt که درون ان سه خط زیر است a b c 2-t2.txt که درون ان سه خط زیر است d e f حالا میخواهم در فایل t3.text تمام حالات زیر را داشته باشم با دستور for ab-ac -ad-ba-bb-bcو...که کلا 27 خط می شود. ولی دستورات زیر این کار را انجام نمیدهند.لطفا راه حل صحیح را بگویید.ممنون s = 0 Open "t3.txt" For Output As #3 Open "t1.txt" For Input As #1 Open "t2.txt" For Input As #2 For i = m To n Line Input #1, m Line Input #2, n s = s + 1 Write #3, i Next Close 3 Text1.Text = s چرا باید 27 خط بشه؟ انتخاب حرف اول از مجموعه t1.txt و حرف دوم از مجموعه t2.txt شامل 9 حالت میشه. انتخاب حرف اول و دوم از یکی از دو مجموعه t1.txt یا t2.txt شامل 36 حالت میشه. انتخاب حرف اول و دوم از یکی از دو مجموعه t1.txt یا t2.txt بدون تکراری بودن دو حرف شامل 30 حالت میشه. انتخاب حرف اول از یکی از دو مجموعه t1.txt و t2.txt و انتخاب حرف دوم از آن یکی مجموعه شامل 18 حالت میشه. لطفا مجموعه کامل حالات مورد نظرتان را بنویسید تا صورت سوال بهتر مشخص شود. bahar11 04 خرداد 1388, 11:12با سپاس شما درست میگویید.9 حالت درست است.لطفا بگویید با چه دستوری این کار را بکنم. ممنون the_king 04 خرداد 1388, 11:24با سپاس شما درست میگویید.9 حالت درست است.لطفا بگویید با چه دستوری این کار را بکنم. ممنون Dim S As Long, i As Long, j As Long Dim m(1 To 3) As String, n(1 To 3) As String S = 0 Open "t1.txt" For Input As #1 Open "t2.txt" For Input As #2 Open "t3.txt" For Output As #3 For i = 1 To 3 Line Input #1, m(i) Line Input #2, n(i) Next Close #1 Close #2 For i = 1 To 3 For j = 1 To 3 S = S + 1 Print #3, m(i) & n(j) Next Next Close #3 Text1.Text = S
این صفحه را در گوگل محبوب کنید
[ارسال شده از: سایت ریسک]
[مشاهده در: www.ri3k.eu]
[تعداد بازديد از اين مطلب: 385]
-
گوناگون
پربازدیدترینها