Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài

Những câu hỏi liên quan
19 Huỳnh Lê hoàng 8a7
Xem chi tiết
My Nguyen
Xem chi tiết
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.

 


 

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

 

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;

}

KenShi
Xem chi tiết
Nguyễn Lê Phước Thịnh
18 tháng 12 2021 lúc 0:39

Bài 2: 

#include <bits/stdc++.h>

using namespace std;

long long x,y;

int main()

{

cin >>x>>y;

cout<<x<<" "<<y;

swap(x,y);

cout<<x<<" "<<y;

return 0;

}

Thịnh Huỳnh
Xem chi tiết
Nguyễn Hoàng Minh
27 tháng 10 2021 lúc 14:39

#include <bits/stdc++.h>

using namespace std;

int x,y;

int main()

{

cin>>x>>y;

cout<<"Gia tri cua x la: "<<x;

cout<<"\nGia tri cua y la: "<<y;

Return 0;

}

Lê Ân
Xem chi tiết
Liên Nguyễn Thị
Xem chi tiết
HAT9
18 tháng 12 2022 lúc 21:40

Var x,y: integer;
Begin
Writeln('nhap 2 so nguyen x va y: '); Readln(x,y);
x:=x+y;
y:=x-x;
x:=y;
Writeln('so x sau hoan doi= ',x);
Writeln('so y sau hoan doi= ',y);
end.

HAT9
18 tháng 12 2022 lúc 21:41

Có 2 cách là nay vs cái gửi trc nhưng cách này ổn hơn nha
Var x,y,t: integer;
Begin
Writeln('nhap 2 so nguyen x va y: '); Readln(x,y);
x:=t;
y:=x;
y:=t;
Writeln('so x sau hoan doi= ',x);
Writeln('so y sau hoan doi= ',y);
end.

Vuive
Xem chi tiết
Monkey D. Luffy
28 tháng 10 2021 lúc 15:49

#include <bits/stdc++.h>

using namespace std;

int x,y;

int main()

{

cout<<"Nhap so x: ";

cin>>x;

cout<<"Nhap so y: ";

cin>>y;

cout<<"So x la: "<<x;

cout<<"\nSo y la: "<<y;

Return 0;

}

Yết Thiên
Xem chi tiết
Trúc Giang
12 tháng 5 2021 lúc 9:55

Câu 2:

Program nii;

Uses crt;

Var a,b,c,A:integer;

Begin

Write ('nhap a');

Readln (a);

Write ('nhap b');

Readln (b);

Write ('nhap c');

Readln (c);

A:=a;

If A<b then A:=b;

If A<c then A:=c;

Write ('Ket qua',A);

Readln;

End.

Trúc Giang
12 tháng 5 2021 lúc 9:51

Câu 1

Program ntg;

Uses crt;

Var A,x,y:integer;

Begin

Write ('nhap x');

Readln (x);

Write ('nhap y');

Readln ('y');

A:=x+y;

Write ('Ket qua',A);

Readln;

End.

 

Nguyễn Lê Phước Thịnh
12 tháng 5 2021 lúc 18:43

Câu 2: 

uses crt;

var a,b,c,max:integer;

begin

clrscr;

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

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

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

max:=a;

if max<b then max:=b;

if max<c then max:=c;

writeln('So lon nhat trong 3 so la: ',max);

readln;

end.

foxbi
Xem chi tiết
HT.Phong (9A5)
18 tháng 3 2023 lúc 7:00

Uses crt;

var n,i,x,u: integer;

begin clrscr;

readln(n);

for i:=1 to n do begin

readln(x);

u:=u+x;

end;

writeln(u);

readln;

end.

Trần Đức Hải Phong
25 tháng 12 2023 lúc 16:54

program TongCacSoNguyen;

var
  N, i, soNguyen, tong: integer;

begin
  // Nhập số lượng N
  write('Nhap so luong N: ');
  readln(N);

  // Khởi tạo tổng
  tong := 0;

  // Nhập và tính tổng các số nguyên
  for i := 1 to N do
  begin
    write('Nhap so nguyen thu ', i, ': ');
    readln(soNguyen);
    tong := tong + soNguyen;
  end;

  // In ra màn hình tổng
  writeln('Tong cua cac so nguyen la: ', tong);

  readln;
end.