Những câu hỏi liên quan
Nguyễn Ngọc Quỳnh Trang
Xem chi tiết
19 Huỳnh Lê hoàng 8a7
Xem chi tiết
My Nguyen
Xem chi tiết
Đinh Hoàng Nhất Quyên
Xem chi tiết
Phía sau một cô gái
8 tháng 8 2023 lúc 20:54

#include <iostream>

using namespace std;

int main() {

     int x, y;

     cin >> x >> y;

     int temp = x;

     x = y;

     y = temp;

     cout << "x=" << x << endl;

     cout << "y=" << y << endl;

     return 0;

}

Bình luận (0)
Nguyen Thai
Xem chi tiết
Anh Phạm
11 tháng 10 2021 lúc 11:18

uses crt;

var x,y:integer;

begin

readln(x,y);

writeln(x,' ',y);

wrieln(y,' ',x);

readln;

end.

 


 

Bình luận (0)
Anh Phạm
11 tháng 10 2021 lúc 11:18

cái đề của bạn nó rất là khặp khiển đấy

 

Bình luận (1)
Nguyễn Lê Phước Thịnh
11 tháng 10 2021 lúc 23:32

#include <bits/stdc++.h>

using namespace std;

int main()

{

long long a,c,tam,x,y;

cin>>x>>y;

a=x;

c=y;

cout<<"a truoc khi doi la:"<<a<<endl;

cout<<"c truoc khi doi la:"<<c<<endl;

tam=a;

a=c;

c=tam;

cout<<"a sau khi doi la:"<<a<<endl;

cout<<"c sau khi doi la:"<<c<<endl;

return 0;

}

Bình luận (0)
Miziki Mon
Xem chi tiết
Nguyễn Lê Phước Thịnh
15 tháng 10 2021 lúc 0:44

#include <bits/stdc++.h>

using namespace std;

long long x,y,tam;

int main()

{

cin>>x>>y;

cout<<"x truoc khi doi la:"<<x<<endl;

cout<<"y truoc khi doi la:"<<y<<endl;

tam=x;

x=y;

y=tam;

cout<<"x sau khi doi la:"<<x<<endl;

cout<<"y sau khi doi la:"<<y;

return 0;

}

Bình luận (0)
Lương Ngọc Anh
Xem chi tiết
Nguyễn Lê Phước Thịnh
1 tháng 2 2023 lúc 10:43

Bài 2:

uses crt;

var n,i,t:integer;

begin

clrscr;

readln(n);

t:=0;

for i:=1 to n do

if (i mod 3=0) and (i mod 5=0) then t:=t+i;

writeln(t);

readln;

end.

Bình luận (0)
Minh Lệ
Xem chi tiết
Quoc Tran Anh Le
18 tháng 11 2023 lúc 17:08

Bình luận (0)
Ánh sao
Xem chi tiết
Nguyễn Lê Phước Thịnh
8 tháng 4 2021 lúc 20:15

Câu 1: 

uses crt;

var a:array[1..5]of integer;

max,i:integer;

begin

clrscr;

for i:=1 to 5 do 

  begin

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

end;

max:=a[1];

for i:=1 to 5 do 

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

writeln(max);

readln;

end.

Bình luận (0)
Nguyễn Lê Phước Thịnh
8 tháng 4 2021 lúc 20:16

Câu 2: 

uses crt;

var a:array[1..6]of integer;

min,i:integer;

begin

clrscr;

for i:=1 to 6 do 

  begin

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

end;

min:=a[1];

for i:=1 to 6 do 

  if min>a[i] then min:=a[i];

writeln(min);

readln;

end.

Bình luận (0)