K
Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

9 tháng 12 2016

Trong các cách viết sau, cách viết nào là tên của tệp?

A. baivan.doc; B. Toanhoc; C. Thuvien*pas; D. Baihat_doc.

10 tháng 12 2016

A. Bạn

Baby Girl

D
datcoder
CTVVIP
9 tháng 11 2023

D. Không có câu nào sai

13 tháng 11 2023

D. Không có câu nào sai

D
datcoder
CTVVIP
10 tháng 11 2023

Câu 18. Trong các câu sau, câu nào đúng?

A. Đuôi tên tệp là viết tắt của tên phần mềm đã tạo ra tệp đó

B. Đuôi tên tệp xác định loại tệp, từ đó hệ điều hành biết các phần mềm nào có thể mở tệp

C. Không thể thay đổi đuôi tên tệp

D. Không có câu nào sai

uses crt;

const fi='input.txt';

var f1:text;

    a,b,c:array[1..100]of real;

    i,n:integer;

begin

clrscr;

assign(f1,fi); reset(f1);

n:=0;

while not eof(f1) do

  begin

     n:=n+1;

     readln(f1,a[n],b[n],c[n]);

  end;

for i:=1 to n do

  writeln('Tong cua dong ',i,' la: ',a[i]+b[i]+c[i]:4:2);

for i:=1 to n do

  writeln('Trung binh cong cua dong ',i,' la: ',(a[i]+b[i]+c[i])/3:4:2);

close(f1);

readln;

end.

19 tháng 3 2023

Program HOC24;

var i,n: integer;

a: array[1..1000] of integer;

t: longint;

f1,f2: text;

const fi='DATA1.TXT';

fo='KQ1.TXT';

begin

assign(f1,fi);

assign(f2,fo);

reset(f1);

rewrite(f2);

readln(f1,n);

for i:=1 to n do read(f1,a[i]);

t:=0;

for i:=1 to n do if a[i] mod 2=0 then t:=t+a[i];

writeln(f2,t);

for i:=1 to n do if a[i] mod 5=0 then write(f2,a[i],' ');

close(f1); close(f2);

end.

22 tháng 12 2016

Tệp tin có 2 phần gồm phần tên và phần mở rộng được viết cách nhau bằng dấu chấm (.)

VD -Baitap.doc