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.

function max(a,b,c:integer):integer;

begin

max:=a;

if max<b then max:=b;

if max<c then max:=c;

end;

uses crt;

const fi='max.out';

var f1:text;

a,b,c,max:integer;

begin

clrscr;

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

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

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

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

max:=a;

if max<b then max:=b;

if max<c then max:=c;

writeln(f1,max);

close(f1);

readln;

end.

31 tháng 10 2021

#include <bits/stdc++.h>

using namespace std;

long long a,b;

int main()

{

cin>>a>>b;

cout<<max(a,b);

return 0;

}

uses crt;

const fi='max.out';

var f1:text;

a,b,c,max:integer;

begin

clrscr;

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

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

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

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

max:=a;

if max<b then max:=b;

if max<c then max:=c;

writeln(f1,max);

close(f1);

readln;

end.

#include <bits/stdc++.h>

using namespace std;

long long a[150],i,s,n,nn;

int main()

{

cin>>n;

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

s=1;

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

if (a[i] %2!=0 && a[i]%3==0) s=s*a[i];

cout<<s<<endl;

nn=a[1];

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

for (i=n; i>=1; i--) 

if (nn==a[i]) 

{

cout<<i<<endl;

break;

}

sort(a+1,a+n+1);

for (i=1; i<=n; i++) cout<<a[i]<<" ";

return 0;

}

1)     Viết chưng trình nhập vào 3 số nguyên a,b,c. Đưa ra màn hình giá trị lớn nhất trong chúng.VDDữ liệu nhập vàoKết quả ra màn hình4266886633882)     Nhập một ký tự. Cho biết ký tự đó có phải là chữ cái hay không. Nếu có ghi ra là “YES”, ngược lại ghi ra “NO”.Dữ liệu nhập vào      Kết quả ra màn hìnhTYESAYESZYES1NO@NO 1)     Viết chưng trình nhập vào 3 số nguyên a,b,c. Đưa ra màn hình giá trị lớn nhất trong chúng.VDDữ...
Đọc tiếp

1)     Viết chưng trình nhập vào 3 số nguyên a,b,c. Đưa ra màn hình giá trị lớn nhất trong chúng.

VD

Dữ liệu nhập vào

Kết quả ra màn hình

4

2

6

6

88

66

33

88

2)     Nhập một ký tự. Cho biết ký tự đó có phải là chữ cái hay không. Nếu có ghi ra là “YES”, ngược lại ghi ra “NO”.

Dữ liệu nhập vào     

Kết quả ra màn hình

T

YES

A

YES

Z

YES

1

NO

@

NO

 

1)     Viết chưng trình nhập vào 3 số nguyên a,b,c. Đưa ra màn hình giá trị lớn nhất trong chúng.

VD

Dữ liệu nhập vào

Kết quả ra màn hình

4

2

6

6

88

66

33

88

2)     Nhập một ký tự. Cho biết ký tự đó có phải là chữ cái hay không. Nếu có ghi ra là “YES”, ngược lại ghi ra “NO”.

Dữ liệu nhập vào     

Kết quả ra màn hình

T

YES

A

YES

Z

YES

1

NO

@

NO

 

3)     Cho hai số nguyên dương a và b (a,b<= 106). In ra ước chung nhỏ nhất và bội chung nhỏ nhất của a và b.

3)     Cho hai số nguyên dương a và b (a,b<= 106). In ra ước chung nhỏ nhất và bội chung nhỏ nhất của a và b.

0

uses crt;

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

n,i,k,dem,dem1:integer;

begin

clrscr;

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

for i:=1 to n do 

  begin

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

end;

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

dem:=0;

dem1:=0;

for i:=1 to n do 

  begin

if a[i] mod 2=0 then inc(dem);

if a[i] mod k=0 then inc(dem1);

end;

writeln('So phan tu chan la: ',dem);

writeln('So phan tu chia het cho ',k,' la: ',dem1);

readln;

end.

uses crt;

const fi='kiemtra.txt';

var f1:text;

a,b,c:integer;

begin

clrscr;

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

readln(f1,a);

readln(f1,b);

readln(f1,c);

writeln((a+b)*(a+c)*(c+b));

close(f1);

readln;

end.

19 tháng 4 2021

E cảm ơn ạ