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.

15 tháng 12 2022

38C (Đề sai 1 chút ở đây không có lệnh in mà chỉ thực hiện công việc ở câu C thôi nhé)

39C

40A

14 tháng 3 2021

undefinedundefinedundefinedundefined

Câu 1: 

const fi='dulieu.dat';

fo='thaythe.out';

var f1,f2:text;

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

n,d,i,vt:integer;

begin

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

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

n:=0;

while not eof(f1) do 

  begin

n:=n+1;

readln(f1,a[n]);

end;

for i:=1 to n do 

  begin

d:=length(a[i]);

vt:=pos('anh',a[i]);

while vt<>0 do 

  begin

delete(a[i],vt,3);

insert('em',a[i],vt);

vt:=pos('anh',a[i]);

end;

end;

for i:=1 to n do 

  writeln(f2,a[i]);

close(f1);

close(f2);

end.

Câu 2: 

uses crt;

const fi='mang.inp';

fo='sapxep.out';

var f1,f2:text;

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

i,n,tam,j:integer;

begin

clrscr;

assign(f1,fi); rewrite(f1);

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

write('Nhap n='); readln(n);

for i:=1 to n do 

  begin

write('A[',i,']='); readln(a[i]);

end;

for i:=1 to n do 

  write(f1,a[i]:4);

for i:=1 to n-1 do 

  for j:=i+1 to n do 

if a[i]>a[j] then

begin

tam:=a[i];

a[i]:=a[j];

a[j]:=tam;

end;

for i:=1 to n do 

  write(f2,a[i]:4);

close(f1);

close(f2);

end.

15 tháng 10 2021

máy mình hơi yếu nên không cài được ide nha mình làm ide online nha

undefined

 

#include <bits/stdc++.h>

using namespace std;

long long x,n,i,ln;

int main()

{

freopen("songuyen.int","r",stdin);

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

cin>>n;

ln=LLONG_MIN;

for (i=1; i<=n; i++)

{

cin>>x;

ln=max(ln,x);

}

cout<<ln;

return 0;

}

19 tháng 2 2022

Câu này dùng passcal thì viết như nào ạ

Đề 3: 

Câu 2: 

#include <bits/stdc++.h>

using namaspace std;

long long x,n,i,dem;

int main()

{

cin>>n;

dem=0;

for (i=1; i<=n; i++)

{

cin>>x;

if (x%2==0 && i%2!=0) dem++;

}

cout<<dem;

return 0;

}

 

đề 1

#include <bits/stdc++.h> 
using namespace std; 
int main() {   
ios_base::sync_with_stdio(false);    
cin.tie(NULL);   
cout.tie(NULL);
long long n,i,x,ans=0,cnt3=0,cnt5=0; 
cin>>n;
for(i=0;i<n;i++)
{
cin>>x; 
if(x%3==0) 
cnt3++;
if(x%5==0)
cnt5++;
}
cout<<"so luong phan tu chia het cho 3 la: "<<cnt3;
cout<<"\nso luong phan tu chia het cho 5 la: "<<cnt5;
return 0;
}

Mình cần gấp  CÁC VÍ DỤ:   AI. TRẮC NGHIỆM:   Câu 1: Khai báo bản tin độ dài tối đa 255?   Câu 2: S1:=11; và S2:=’11’; giống nhau đúng hay sai?   Trả lời:   Câu 3:   Lệnh   S[5];   để tham chiếu đến kí tự thứ 5 trong xâu S đúng không?   Trả lời:   Câu 4: Khai báo 1 xâu S có độ dài tối đa 100?   Trả lời:   Câu 5: Var stl:char; st2:string[1];   Lệnh gán stl:=st2; đúng không? Giải thích?   Trả lời:   Câu 6:...
Đọc tiếp

Mình cần gấp 

CÁC VÍ DỤ:

 

AI. TRẮC NGHIỆM:

 

Câu 1: Khai báo bản tin độ dài tối đa 255?

 

Câu 2: S1:=11; và S2:=’11’; giống nhau đúng hay sai?

 

Trả lời:

 

Câu 3:

 

Lệnh

 

S[5];

 

để tham chiếu đến kí tự thứ 5 trong xâu S đúng không?

 

Trả lời:

 

Câu 4: Khai báo 1 xâu S có độ dài tối đa 100?

 

Trả lời:

 

Câu 5: Var stl:char; st2:string[1];

 

Lệnh gán stl:=st2; đúng không? Giải thích?

 

Trả lời:

 

Câu 6: Trong ngôn ngữ lập trình Pascal, xâu có độ dài bằng 0 gọi là......

 

A. Xâu rỗng

 

B. Xâu không

 

C. Không phải là xấu

 

D. Xâu trắng

 

Câu 7: Phát biểu nào sau đây sai:

 

A. Xâu có độ dài bằng 0 là xâu rỗng. C. Số lượng kí tự trong 1 xâu gọi là độ dài của xâu.

 

B. Xâu là 1 kí tự trong bảng mã ASCII

 

D. Mỗi kí tự được gọi là 1 phần tử của

 

Var

 

xâu.

 

b

 

Câu 8: Phép gán giá trị biến xâu(S) nào sau đây đúng?

 

A. S:='tin hoc';

 

B. S:="tin hoc";

 

C. S:=tin hoc;

 

D. S:= 'tin hoc'

 

6 Câu 9: Write (ha Noi > ‘ ha nam’) cho kết quả ?

 

A. True

 

B. False

 

Câu 10: ‘học + Tin

 

thực hiện phép ghép xâu trên cho kết quả gì?

 

A. 'Tinhoc'

 

D. 'hocTin'

 

B. 'Tin hoc'

 

C. 'hoc Tin'

 

*

 

Câu 11: Write (‘May tinh’>= ‘May tinh’) cho kết quả ?

 

A. True

 

B. False

 

I/.

 

II

 

Câu 12: Cho xâu st= 'chuc mung nam moi !', hãy chọn giá trị tham chiếu đúng:

 

A. st[6]='';

 

D. st[6]='c';

 

B. st[6]='m';

 

C. st[6]='u';

 

II

0
28 tháng 12 2021

Câu 7: B

Câu 6: B