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
Nguyễn Đức Hiếu
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;

}

huỳnh
Xem chi tiết
Nguyễn Lê Phước Thịnh
8 tháng 1 2022 lúc 7:36

#include <bits/stdc++.h>

using namespace std;

long long a,b,c,ln;

int main()

{

cin>>a>>b>>c;

ln=a;

ln=max(ln,b);

ln=max(ln,c);

cout<<ln;

return 0;

}

Nguyễn Bảo Việt
Xem chi tiết
Nguyễn Lê Phước Thịnh
2 tháng 10 2021 lúc 0:18

Bài 2: 

#include <bits/stdc++.h>;

using namespace std;

int main();

{

long m,n;

cout<<"Nhap m="; cin>>m;

cout<<"Nhap n="; cin>>n;

cout<<m*n-2;

return 0;

}

Huy Hoang Nguyen
Xem chi tiết
Đu Boylove Vân Anh
Xem chi tiết
Phía sau một cô gái
17 tháng 4 2023 lúc 15:14

program Tim_so;

var

      a: array of integer;

      i, n, max, min: integer;

begin

      write('Nhap so phan tu cua danh sach: ');

      readln(n);

      SetLength(a, n);

      for i := 0 to n - 1 do

      begin

            write('Nhap gia tri phan tu thu ', i + 1, ': ');

            readln(a[i]);

            if (i = 0) then

            begin

                  max := a[i];

                  min := a[i];

            end

            else

            begin

                  if (a[i] > max) then

                        max := a[i];

                  if (a[i] < min) then

                        min := a[i];

            end;

      end;

      writeln('Phan tu co gia tri lon nhat la: ', max);

      writeln('Phan tu co gia tri nho nhat la: ', min);

end.

Khoi Tran
Xem chi tiết
Nguyễn Lê Phước Thịnh
20 tháng 4 2021 lúc 20:53

Câu 1: 

uses crt;

const fi='nguon.txt'

var f1:text;

a,b,c:integer;

begin

clrscr;

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

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

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

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

writeln(f1,a);

writeln(f1,b);

writeln(f1,c);

close(f1);

readln;

end.

Nguyễn Lê Phước Thịnh
20 tháng 4 2021 lúc 20:56

Câu 2: 

const fi='nguon.txt'

fo='kq.txt'

var f1,f2:text;

a,b,c,max,min:integer;

begin

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

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

readln(f1,a);

readln(f1,b);

readln(f1,c);

writeln(f2,(a+b+c)/3:4:2);

max:=a;

if max<b then max:=b;

if max<c then max:=c;

writeln(f2,max);

min:=a;

if min>b then min:=b;

if min>c then min:=c;

writeln(f2,min);

close(f1);

close(f2);

end.

lam mi
Xem chi tiết
Tai Lam
15 tháng 5 2022 lúc 21:46

Program Trungbinhcong;

Uses crt;

Var a,b,c,d,tb: integer;

Begin

Clrscr;

Write('Nhap so thu nhat:'); Readln(a);

Write('Nhap so thu hai:'); Readln(b);

Write('Nhap so thu ba:'); Readln(c);

Write('Nhap so thu tu:'); Readln(d);

tb:=(a+b+c+d)/4;

Writeln('Trung binh cong cua 4 so la:',tb:4:2);

Readln

End.

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.