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.

7 tháng 8 2023

#include <iostream>

#include <vector>

#include <algorithm>

using namespace std;

struct Pair {

     int a, b;

};

     bool compare(const Pair& p1, const Pair& p2) {

          if (p1.a < p2.a) {

               return true;

          } else if (p1.a == p2.a) {

               return p1.b >= p2.b;

          }

          return false;

}

int main() {

     int N;

     cin >> N;

     vector<Pair> C(N);

     for (int i = 0; i < N; ++i) {

          cin >> C[i].a;

     }

     for (int i = 0; i < N; ++i) {

          cin >> C[i].b;

     }

     sort(C.begin(), C.end(), compare);

     for (int i = 0; i < N; ++i) {

          cout << C[i].a << " " << C[i].b << endl;

     }

     return 0;

}

   
5 tháng 8 2017

Bài 9. Làm việc với dãy sốBài 9. Làm việc với dãy sốBài 9. Làm việc với dãy số

5 tháng 8 2017

không phải cách tối ưu không thì hông biết nhưng mà ra đáp án :)) là được nhỉ

10 tháng 5 2017

4a

5d

7 không đáp án nào đúng đâu bạn

8c

9a

12a

13a

14d

15c

16c

17b

19c

chúc bạn thi tốt haha

7 tháng 12 2016

xử nữ

 

7 tháng 1 2017

SONG NGƯ

undefined

 

25 tháng 9 2016

dòng nào cũng 5 kí tự ?

25 tháng 9 2016

begin

   writeln('*****');

   writeln('*****');

   writeln('*****');

   writeln('*****');

   writeln('*****');

   readin

end.

8 tháng 5 2017

thiếu hai dấu chấm phẩy ";" ở: Bài 2. Làm quen với chương trình và ngôn ngữ lập trình

sửa thành:

TB: real;

A: array [1..100] of real;

lại thiếu dấu chấm phẩy ở ba chỗ nữa lần lượt là:

Bài 2. Làm quen với chương trình và ngôn ngữ lập trìnhBài 2. Làm quen với chương trình và ngôn ngữ lập trìnhBài 2. Làm quen với chương trình và ngôn ngữ lập trình

Sửa lại thành:

readln (a[i]);

TB:=0;

TB:=TB/n;

Cần có thêm readln trên end. để dừng chương trình lại để xem.

13 tháng 10 2017

VPT đây nhé :

VPT là gì Bùi Khánh Thi

ai giúp mình làm đề cương câu này với mai mình thi rồi ạ Các phép toán nào sau đây sử dụng trong ngôn ngữ lập trình Pascal?+, -, *, /, div, moddiv, mod+, -, *, / và <, >, >=, <=, < >, = <, >, >=, <=, < >, =9.Các phép so sánh nào sau đây sử dụng trong ngôn ngữ lập trình Pascal?+, -, *,/and, or, <, >, >=, <=, < >, =and, or<, >, >=, <=, < >, =10.Kết quả của các phép chia hai số nguyên 14 và 5 là:14/5=2; 14 div 5=2; 14 mod 5=4;14/5=2.8;...
Đọc tiếp

ai giúp mình làm đề cương câu này với mai mình thi rồi ạ

 

Các phép toán nào sau đây sử dụng trong ngôn ngữ lập trình Pascal?

+, -, *, /, div, mod

div, mod

+, -, *, / và <, >, >=, <=, < >, =

 <, >, >=, <=, < >, =

9.Các phép so sánh nào sau đây sử dụng trong ngôn ngữ lập trình Pascal?

+, -, *,/

and, or, <, >, >=, <=, < >, =

and, or

<, >, >=, <=, < >, =

10.Kết quả của các phép chia hai số nguyên 14 và 5 là:

14/5=2; 14 div 5=2; 14 mod 5=4;

14/5=2.8; 14 div 5=4; 14 mod 5=2

14/5=2.8; 14 div 5=2; 14 mod 5=4;

14/5=3; 14 div 5=2; 14 mod 5=4

11.Trong Pascal, điều kiện để a, b, c là 3 cạnh của một tam giác đều là:

a = b = c

(a = b) and (b = c)

(a = b) or (b = c)

a = b, b = c

12.Kiểu dữ liệu số nguyên là:

byte, integer

byte, word, integer, longint

char, string

real

13.Cho a=1, b=2, c=3, khẳng định nào sau đây là đúng?

a, b, c là 3 cạnh của một tam giác vì thỏa mãn điều kiện giá trị 2 cạnh cộng lại lớn hơn cạnh thứ 3

a, b, c là 3 cạnh của một tam giác vì thỏa mãn điều kiện giá trị 2 cạnh cộng lại lớn hơn cạnh thứ 3 và tam giác đó có 1 góc vuông vì thỏa mãn c2=a2 + b2 (theo định lí Pytago)

a, b, c không là 3 cạnh của một tam giác

14.Cú pháp khai báo biến là:

var <danh sách tên biến> : <giá trị>;

var <danh sách tên biến> : <kiểu dữ liệu>;

var <danh sách tên biến> := <kiểu dữ liệu>;

var <danh sách tên biến> = <giá trị>;

15.Cú pháp khai báo hằng là:

var <tên hằng> = <giá trị>;

const <tên hằng> : <giá trị>;

var <danh sách tên hằng> = <giá trị>;

const <tên hằng> = <giá trị>;

16.Cú pháp câu lệnh gán giá trị cho biến là:

<tên biến> = <giá trị>;

<tên biến> : <giá trị>;

<tên biến> := <giá trị>;

<tên biến> := <giá trị>

1
24 tháng 12 2021

Câu 8: A

Câu 9: B

Câu 11: B

11 tháng 5 2017

Program tính_chia;

Uses crt;

Var i, n, s, a: integer;

Begin

Write('Nhap so n: '); readln(n);

s:=1;

For i:=1 to n do s:=s*i;

a:=0;

For i:=1 to n do a:=a+i;

Writeln('Ket qua phep tinh chia bang: ', s/a :10:2);

readln;

End.

1 tháng 12 2016

vãi cả photoshop :V t tưởng ông làm gì

1 tháng 12 2016

hay gọi thầy chỉ đánh sập tiệm nét đê :D