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.

16 tháng 11 2022

Chọn B

16 tháng 11 2022

B

14 tháng 4 2022

Program HOC24;

var f1,f2: text;

a,b: integer;

t: longint;

begin

assign(f1,'input.pas');

reset(f1);

assign(f2,'output.pas');

rewrite(f2);

readln(f1,a,b);

t:=a*b;

write(f2,t);

close(f1);

close(f2);

End.

Câu 1. Xét theo cách thức truy cập dữ liệu, tệp được phân thành những loại nào?A.  Tệp truy cập tuần tự và tệp truy cập trực tiếp.B.  Tệp văn bản và tệp có cấu trúc.C.  Tệp truy cập tuần tự, tệp truy cập trực tiếp và tệp có cấu trúc.D.  Tệp văn bản, tệp có cấu trúc và tệp số nguyên. Câu 2. Để khai báo biến tệp văn bản, ta dùng cú pháp:A. var <tên biến tệp>: text;                             B. var <tên...
Đọc tiếp

Câu 1. Xét theo cách thức truy cập dữ liệu, tệp được phân thành những loại nào?

A.  Tệp truy cập tuần tự và tệp truy cập trực tiếp.

B.  Tệp văn bản và tệp có cấu trúc.

C.  Tệp truy cập tuần tự, tệp truy cập trực tiếp và tệp có cấu trúc.

D.  Tệp văn bản, tệp có cấu trúc và tệp số nguyên.

 

Câu 2. Để khai báo biến tệp văn bản, ta dùng cú pháp:

A. var <tên biến tệp>: text;                             B. var <tên tệp>: text;

C. var <tên biến tệp, tên tệp>: text;                  D. var <tên biến tệp>: string;

 

Câu 3. Trong các khai báo tệp văn bản sau, khai báo nào là sai?

A. var BT_1: text;                           B. var  BT1: text;

C. var BT1,BT2: text;                      D. var  1BT: text;

 

Câu 4. Cú pháp của câu lệnh gắn tên tệp cho biến tệp:

A. assign(<biến tệp>, <tên tệp>);                     B. assign(<tên tệp>, <biến tệp>);

C. assign(<biến tệp>; <tên tệp>);                     D. assign(<tên tệp>);

 

Câu 5. Trong các câu lệnh sau câu lệnh nào đúng?

A. assign(f, „Baitap.txt‟);         B. assign(„Baitap.txt‟, f);

C. assign(f); D. assign(f, “Baitap.txt”);

 

2
23 tháng 2 2021

Câu 1. Xét theo cách thức truy cập dữ liệu, tệp được phân thành những loại nào?

A.  Tệp truy cập tuần tự và tệp truy cập trực tiếp.

B.  Tệp văn bản và tệp có cấu trúc.

C.  Tệp truy cập tuần tự, tệp truy cập trực tiếp và tệp có cấu trúc.

D.  Tệp văn bản, tệp có cấu trúc và tệp số nguyên.

Câu 2. Để khai báo biến tệp văn bản, ta dùng cú pháp:

A. var <tên biến tệp>: text;                             B. var <tên tệp>: text;

C. var <tên biến tệp, tên tệp>: text;                  D. var <tên biến tệp>: string;

 

Câu 4. Cú pháp của câu lệnh gắn tên tệp cho biến tệp:

A. assign(<biến tệp>, <tên tệp>);                     B. assign(<tên tệp>, <biến tệp>);

C. assign(<biến tệp>; <tên tệp>);                     D. assign(<tên tệp>);

 

Câu 1: B

Câu 2: A

Câu 3: D

Câu 4: B

Câu 5: Không có câu nào đúng

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

const fi='input.inp';

fo='output.out';

var a,b:integer;

f1,f2:text;

begin

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

assign(f2,fo); rewrite(f2);

readln(f1,a,b);

if a<b then writeln(f2,a)

else writeln(f2,b);

close(f1);

close(f2);

end.

30 tháng 3 2022

Viết giúp mik nhưng là cho biết 2 số lớn nhất với ạ

const fi='mang.txt';

fo='tong.txt';

var f1,f2:text;

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

n,i,t:integer;

begin

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

assign(f2,fo); rewriteln(f2);

n:=0;

while not eof(f1) do 

  begin

inc(n);

read(f1,a[n]);

end;

t:=0;

for i:=1 to n do 

  t:=t+a[i];

writeln(f2,t);

close(f1);

close(f2);

end.

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

#include <bits/stdc++.h>

using namespace std;

string st;

int d,i,dem;

int main()

{

freopen("xau.inp","r",stdin);

freopen("xau.out","w",stdout);

cin>>st;

d=st.length();

dem=0;

for (i=0; i<=d-1; i++)

if (st[i]=='a') dem++;

cout<<dem;

return 0;

}

const fi='bt.inp';

fo='bt.out';

var f1,f2:text;

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

i,n,ln:integer;

begin

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

assign(f2,fo); rewrite(f2);

readln(f1,n);

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

ln:=a[1];

for i:=1 to n do 

if ln<a[i] then ln:=a[i];

write(f2,ln);

close(f1);

close(f2);

end.

22 tháng 8 2023

Lưu dữ liệu dưới dạng 1 phần mềm hệ thống quản trị mà ai cũng có thể dễ dàng khai thác.