tag:blogger.com,1999:blog-5960836988659640122.post7655959269535141201..comments2024-03-27T20:35:49.022+07:00Comments on Code Pascal - Bai tap Pascal - Hoc Pascal truc tuyen - Tin hoc 11: Tệp - Kiểu dữ liệu tệp trong PascalĐô Rê Mon ĐZhttp://www.blogger.com/profile/15083814602565259047noreply@blogger.comBlogger18125tag:blogger.com,1999:blog-5960836988659640122.post-89199457770748375292023-12-07T09:04:30.418+07:002023-12-07T09:04:30.418+07:00B92ED
referanskodunedir.com.trB92ED<br /><a href="https://referanskodunedir.com.tr/" rel="nofollow">referanskodunedir.com.tr</a><br />754A1Danny7F177noreply@blogger.comtag:blogger.com,1999:blog-5960836988659640122.post-17515280753269493852023-10-18T19:32:19.137+07:002023-10-18T19:32:19.137+07:00ankara parça eşya taşıma
takipçi satın al
antalya ...<a href="https://bit.ly/ankara-parca-esya-tasima" rel="nofollow">ankara parça eşya taşıma</a><br /><a href="https://bit.ly/takipci-satin-al-takipci-satin-al-takipci-satin-al" rel="nofollow">takipçi satın al</a><br /><a href="https://bit.ly/antalya-rent-a-car" rel="nofollow">antalya rent a car</a><br /><a href="https://titandijital.com.tr/antalya-rent-a-car/" rel="nofollow">antalya rent a car</a><br /><a href="https://titandijital.com.tr/ankara-parca-esya-tasima/" rel="nofollow">ankara parça eşya taşıma</a><br />0HK7ORNebulaRebelnoreply@blogger.comtag:blogger.com,1999:blog-5960836988659640122.post-76441451313821679302023-10-07T12:42:02.960+07:002023-10-07T12:42:02.960+07:00uşak
van
hakkari
elazığ
bingöl
211<a href="https://bayanlarsitesi.com/usak-escort/" rel="nofollow">uşak</a><br /><a href="https://bayanlarsitesi.com/van-escort/" rel="nofollow">van</a><br /><a href="https://bayanlarsitesi.com/hakkari-escort/" rel="nofollow">hakkari</a><br /><a href="https://bayanlarsitesi.com/elazig-escort/" rel="nofollow">elazığ</a><br /><a href="https://bayanlarsitesi.com/bingol-escort/" rel="nofollow">bingöl</a><br />211QuantumByteMasternoreply@blogger.comtag:blogger.com,1999:blog-5960836988659640122.post-5252328626144425032023-10-04T05:32:57.842+07:002023-10-04T05:32:57.842+07:00elazığ
bilecik
kilis
sakarya
yozgat
2CY<a href="https://bayanlarsitesi.com/elazig-escort/" rel="nofollow">elazığ</a><br /><a href="https://bayanlarsitesi.com/bilecik-escort/" rel="nofollow">bilecik</a><br /><a href="https://bayanlarsitesi.com/kilis-escort/" rel="nofollow">kilis</a><br /><a href="https://bayanlarsitesi.com/sakarya-escort/" rel="nofollow">sakarya</a><br /><a href="https://bayanlarsitesi.com/yozgat-escort/" rel="nofollow">yozgat</a><br />2CYSuatnoreply@blogger.comtag:blogger.com,1999:blog-5960836988659640122.post-53626878444805346252019-12-02T14:56:45.434+07:002019-12-02T14:56:45.434+07:00ai biết tổ hợp phím mở nhanh tệp là gì ko ạ. chỉ e...ai biết tổ hợp phím mở nhanh tệp là gì ko ạ. chỉ em vơi. em cảm ơn ạ....<br />Anonymoushttps://www.blogger.com/profile/16434245860938599922noreply@blogger.comtag:blogger.com,1999:blog-5960836988659640122.post-90191005065444383822019-01-14T21:20:37.957+07:002019-01-14T21:20:37.957+07:00Trong 1 chương trình sd tệp có tên là DATA vậy ta ...Trong 1 chương trình sd tệp có tên là DATA vậy ta có thể khai báo biến tệp với tên DATA đc ko ạ vì saoAnonymoushttps://www.blogger.com/profile/14944633942675756436noreply@blogger.comtag:blogger.com,1999:blog-5960836988659640122.post-50483327716518288292018-04-13T00:10:17.259+07:002018-04-13T00:10:17.259+07:00111111Anonymousnoreply@blogger.comtag:blogger.com,1999:blog-5960836988659640122.post-77493497237306885332017-06-21T23:55:08.000+07:002017-06-21T23:55:08.000+07:00f:text;
s:string;
n:longint;
khi đọc tệp (vd read(...f:text;<br />s:string;<br />n:longint;<br />khi đọc tệp (vd read(n,s) ) nó đọc luôn cả kí tự ' ' <br />Vd nhập(5 a) thì nó đọc là n=5 và s=' a'.<br />(đáng lí ra n=5 và s=a thì mới đúng,nếu cả 2 n,s cùng kiểu dữ liệu thì ko sao)<br />ai bít lí do tại sao s=' a' mà ko phải s='a' ko ?? (trường hợp khi n và s khác kiểu dữ liệu) Cuonghttps://www.blogger.com/profile/11660346679695270680noreply@blogger.comtag:blogger.com,1999:blog-5960836988659640122.post-76744448089278689272017-04-18T21:01:57.554+07:002017-04-18T21:01:57.554+07:00uses crt,dos;
var
b,c:longint;i,a,x:char; doc:st...uses crt,dos;<br />var<br /> b,c:longint;i,a,x:char; doc:string; j,dem1,dem2,dem3,dem4:integer; f:text;<br /> h,m,s,hs:word;ye,mo,d,wd:word;<br />begin dem1:=0;dem2:=0;dem3:=0;dem4:=0;<br />assign(f,'lich_su.txt');<br />If IOResult = 0 then<br /> begin<br /> Append(f); close(f);<br /> end<br />Else<br /> begin<br /> rewrite(f); close(f);<br /> end;<br /> clrscr; writeln('chuong trinh da san sang');<br /> repeat dem4:=dem4+1;<br /> repeat<br /> dem3:=dem3+1;<br /> repeat dem2:=dem2+1;<br /> repeat<br /> i:=readkey;<br /> if ord(i)=0 then i:=readkey;<br /> b:=ord(i);c:=ord(j);dem1:=dem1+1;<br /> writeln(' ki tu :{ ',chr(b),' } trong ma ASCII co STT la: ==> ',ord(i));<br /> doc:=doc+chr(b);append(f);write(f,'[',doc,']');close(f);<br />until dem1=1;dem1:=0; doc:='';<br /> append(f);write(f,'[',doc,']');close(f);<br />until dem2=16;dem2:=0 ;doc:='';<br /> append(f);writeln(f,'[',doc,']');close(f);<br />until dem3=20;dem3:=0;doc:='';<br /> append(f);writeln(f,'[',doc,']');close(f);<br />until dem4=32767;<br /> readln;<br />end.<br />Cái này vì sao chạy lại tắt liền.Anonymoushttps://www.blogger.com/profile/16331385882734638171noreply@blogger.comtag:blogger.com,1999:blog-5960836988659640122.post-51318628242356051202016-12-01T19:15:11.534+07:002016-12-01T19:15:11.534+07:00giải giúp em bài này đi em đang hc bồi dưỡng lớp 9...giải giúp em bài này đi em đang hc bồi dưỡng lớp 9 làm ts bài này bí quá nhờ các anh giúp dùm<br />Tổng n số nguyên<br />Cho dãy n số nguyên.<br />Yêu cầu: tìm tổng của các phần tử của từng dãy<br />Dữ Liệu vào file SONGUYEN.IPN gồm n dòng, mỗi dòng là 1 dãy số (mỗi dãy có tối đa 100 phần tử và mỗi phần tử có giá trị tuyệt đối không quá 30000; hai phần tử đứng kế sau nhau cách nhau ít nhất một khoảng trắng).<br />Kết quả: hi vào file SONGUYEN.OUT gồm n dòng mỗi dòng là 1 kết quả tìn đc tương ứng vs dữ liệu trong file inputAnonymousnoreply@blogger.comtag:blogger.com,1999:blog-5960836988659640122.post-34176467846002268072016-03-31T13:41:49.531+07:002016-03-31T13:41:49.531+07:00rểrểAnonymousnoreply@blogger.comtag:blogger.com,1999:blog-5960836988659640122.post-4495332084097427552015-11-27T21:46:00.858+07:002015-11-27T21:46:00.858+07:00đk cái j vậy
tao ko hiểu nhập nhiều giá trị kiểu j...đk cái j vậy<br />tao ko hiểu nhập nhiều giá trị kiểu j?<br />vậy mà cũng đăng<br />Anonymoushttps://www.blogger.com/profile/10435969000699232317noreply@blogger.comtag:blogger.com,1999:blog-5960836988659640122.post-66354715318183879462015-04-01T20:40:09.952+07:002015-04-01T20:40:09.952+07:00tại sao viết lập trình không lỗi nhưng lúc in ra t...tại sao viết lập trình không lỗi nhưng lúc in ra thì lúc nào cũng bằng 0 zậy ( trả lời đúng cho địt).Anonymousnoreply@blogger.comtag:blogger.com,1999:blog-5960836988659640122.post-75964690293521576472014-07-10T08:50:45.026+07:002014-07-10T08:50:45.026+07:00Cho mình hỏi là làm sao để kiểm tra điều kiện của ...Cho mình hỏi là làm sao để kiểm tra điều kiện của tệp?Anonymousnoreply@blogger.comtag:blogger.com,1999:blog-5960836988659640122.post-48371284731252534182014-05-29T06:59:12.146+07:002014-05-29T06:59:12.146+07:00a dua duAnonymousnoreply@blogger.comtag:blogger.com,1999:blog-5960836988659640122.post-17666048633807833652013-06-28T21:29:05.050+07:002013-06-28T21:29:05.050+07:00p uj?thao tác vào file sao j pạn?
p uj?thao tác vào file sao j pạn?<br />Anonymoushttps://www.blogger.com/profile/17227477682320529263noreply@blogger.comtag:blogger.com,1999:blog-5960836988659640122.post-91687160823765634182013-06-28T21:28:20.564+07:002013-06-28T21:28:20.564+07:00p uj?thao tác vào file sao j pạn?
p uj?thao tác vào file sao j pạn?<br />Anonymoushttps://www.blogger.com/profile/17227477682320529263noreply@blogger.comtag:blogger.com,1999:blog-5960836988659640122.post-16859196387502685222013-03-16T02:02:25.783+07:002013-03-16T02:02:25.783+07:00Simply wish to say your article is as surprising. ...Simply wish to say your article is as surprising. The clarity in your post is simply great and <br />i can assume you are an expert on this subject. Fine with your permission allow me to <br />grab your RSS feed to keep updated with forthcoming post.<br /><br />Thanks a million and please carry on the <br />gratifying work.<br /><br />Feel free to visit my weblog :: <a href="http://exsocial.tk/pg/profile/KentMcrey" rel="nofollow">how to file bankruptcy in florida</a>Anonymousnoreply@blogger.com