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.

5 tháng 12 2018

giúp mình với ạ

6 tháng 12 2018

1.

use crt;
Var a, b: real;
Begin
write('Nhap so a: '); readln(a);
write('Nhap so b: '); readln(b);
if a<b then write('so a nho hon') else write('so b nho hon');
readln;
end.

2. a và b có khác nhau?

uses crt;

var a,b: integer;

begin

clrscr;

readln(a);

readln(b);

if a>b then writeln(a,' ',b)

else writeln(b,' ',a);

readln;

end.

(không đầy đủ lắm đâu)

3.

var a,b,c,max : integer;


Begin

writeln('Tim MAX cua 3 so a,b,c');

write('Nhap so a :');readln(a);
write('Nhap so b :');readln(b);
write('Nhap so c :');readln(c);

max:= a;

if max < b then max := b;
if max < c then max := c;

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

readln;

end.

4.

uses crt;

var n:integer;
begin
wirite ( 'nhap gia tri cua x: ' );
readln (n);
if x mod 2 = 0 then write ( 'x la so chan' )
else wirite ( 'x la so le' );
end.

5.

uses crt;
var n:intger;
begin
clrscr;
writeln('nhap vao so nguyen duong:');
readln(n);
if n >= 0 then
writeln('so ',n,' la so duong')
else
writeln('so ',n,' la so am');
if (n mod 2 = 0) then
writeln('so ',n,' la so chan')
else
writeln('so ',n,' la so le.');
readln;
end.

(Công sức đấy! Chúc bạn học tốt!)khocroi

11 tháng 12 2021

b: 

#include <bits/stdc++.h>

using namespace std;

long long a,b,t;

int main()

{

cin>>a>>b;

t=a+b;

cout<<t;

return 0;

}

11 tháng 12 2021

b: 

#include <bits/stdc++.h>

using namespace std;

long long a,b,t;

int main()

{

cin>>a>>b;

t=a+b;

cout<<t;

return 0;

}

25 tháng 12 2021

Bài 2: 

#include <bits/stdc++.h>

using namespace std;

double a,b,c;

int main()

{

cin>>a>>b>>c;

if (a>0 && b>0 && c>0 && a+b>c && a+c>b && b+c>a) cout<<"Phai";

else cout<<"Khong phai";

return 0;

}

Bước 1: Nhập a

Bước 2: Nếu a mod 2=0 thì xuất a là số chẵn

Ngược lại xuất a là số lẻ

Bước 3: Kết thúc

c: 

#include <bits/stdc++.h>

using namespace std;

long long a[1000],n,i;

int main()

{

cin>>n;

for (i=1; i<=n; i++) cin>>a[i];

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

if (a[i]%2==0) cout<<a[i]<<" ";

return 0;

}

d: 

#include <bits/stdc++.h>

using namespace std;

long long a[1000],n,i,nn;

int main()

{

cin>>n;

for (i=1; i<=n; i++) cin>>a[i];

nn=a[1];

for (i=1; i<=n; i++) nn=min(nn,a[i]);

cout<<nn;

return 0;

}

1. VCT nhập vào độ dài 3 cạnh của 1 tam giác. Kiểm tra xem tam giác đó có phải là tam giác vuông không? 2. VCT nhập vào độ dài 3 cạnh của 1 tam giác. Kiểm tra xem tam giác đó có phải là tam giác đều không? 3. VCT nhập vào 1 số nguyên bất kì, kiểm tra xem số đó có chia hết cho 4 và 5 hay không? 4. VCT nhập vào 2 số nguyên bất kì, kiểm tra xem 2 số đó có chia hết cho nhau hay ko? 5. VCt nhập vào 4 số nguyên bất kì, in ra màn hình...
Đọc tiếp

1. VCT nhập vào độ dài 3 cạnh của 1 tam giác. Kiểm tra xem tam giác đó có phải là tam giác vuông không?

2. VCT nhập vào độ dài 3 cạnh của 1 tam giác. Kiểm tra xem tam giác đó có phải là tam giác đều không?

3. VCT nhập vào 1 số nguyên bất kì, kiểm tra xem số đó có chia hết cho 4 và 5 hay không?

4. VCT nhập vào 2 số nguyên bất kì, kiểm tra xem 2 số đó có chia hết cho nhau hay ko?

5. VCt nhập vào 4 số nguyên bất kì, in ra màn hình số lớn nhất trong 4 số?

6. VCt nhập vào 2 số nguyên khác nhau từ bàn phím, sắp xếp 2 số đó theo thứ tự giảm dần

7. VCT nhập vào 2 số nguyên khác nhau từ bàn phím, sắp xếp 2 số đó theo thứ tự tăng dần

8. VCT nhập vào 1 số nguyên bất kỳ, kiểm tra và thông báo ra màn hình số đó là số chẵn hay không?

0

uses crt;

var b:integer;

begin

clrscr;

readln(b);

writeln(b);

if b mod 2=0 then writeln('la so chan')

else writeln('la so le');

readln;

end.

10 tháng 5 2023

Câu 58:

Var n:integer;

Begin

Write('n = ');readln(n);

If n mod 2 <> 0 then write(n,' la so le')

Else write(n,' khong la so le');

Readln

End.

10 tháng 5 2023

Câu 61:

Var n:integer;

Begin

Write('n = ');readln(n);

If n mod 2 = 0 then write(n,' la so chan')

Else write(n,' khong la so chan');

Readln

End.

uses crt;

var a,b:integer;

begin

clrscr;

readln(a,b);

if (a<0) then writeln(a,' la so am')

else if (a>0) then writeln(a,' la so duong')

else writeln(a,' khong la so am cung khong la so duong');

if (b<0) then writeln(b,' la so am')

else if (b>0) then writeln(b,' la so duong')

else writeln(b,' khong la so am cung khong la so duong');

if (a>0) then writeln(sqr(a+b));

readln;

end.