nhập 2 số a,b in ra màn hình số lớn hơn
Những câu hỏi liên quan
6 tháng 4 2023 lúc 21:36
Viết chương trình Pascal nhập vào 2 số a, b in ra màn hình số lớn hơn. Dùng câu lệnh if... then...
Program HOC24;
var a,b: integer;
begin
write('Nhap a: '); readln(a);
write('Nhap b: '); readln(b);
if a> b then write(a);
if a<b then write(b);
if a=b then write('2 so bang nhau');
readln
end.
Đúng 1
Bình luận (0)
In giá trị lớn hơn ra màn hình của 2 số a và b được nhập vào từ bàn phím
#include <bits/stdc++.h>
using namespace std;
double a,b;
int main()
{
cin>>a>>b;
cout<<max(a,b);
return 0;
}
Đúng 0
Bình luận (0)
6 tháng 4 2023 lúc 21:38
Viết chương trình Pascal nhập vào 2 số a, b in ra màn hình số lớn hơn. Dùng câu lệnh if... then... else…
Var a,b:real;
Begin
Write('a = ');readln(a);
Write('b = ');readln(b);
If a > b then write('So lon la ',a:10:2)
Else if b > a then write('So lon la ',b:10:2)
Else write('Hai so bang nhau');
Readln;
End.
Đúng 1
Bình luận (2)
Viết chương trình nhập số nguyên a khác 10 , nếu a > 10 in ra màn hình câu thông báo " bạn nhập số lớn hơn 10 " ngược lại in ra câu thông báo " bạn nhập số nhỏ hơn 10"
#include <bits/stdc++.h>
using namespace std;
int a;
int main()
{
cin>>a;
if (a>10) cout<<"ban nhap so lon hon 10";
else cout<<"ban nhap so nho hon 10";
return 0;
}
Đúng 1
Bình luận (0)
Bài 1. Viết chương trình nhập vào 1 mảng a gồm n phần tử nguyên được nhập từ bàn phím.
a) Tính tổng các số chẵn và lớn hơn 10? Thông báo kết quả và in mảng ra màn hình?
b) Đếm các số lẻ hoặc nhỏ hơn 100? Thông báo kết quả và in mảng ra màn hình?
#include <bits/stdc++.h>
using namespace std;
long long x,n,i,t,dem;
int main()
{
cin>>n;
dem=0;
t=0;
for (i=1; i<=n; i++)
{
cin>>x;
if (x%2==0 && x>10) t+=x;
if (x%2!=0 || x<100) dem++;
}
cout<<t<<" "<<dem;
return 0;
}
Đúng 0
Bình luận (0)
Cho hai số nguyên a b nhập từ phím Em hãy viết chương trình Pascal để in ra màn hình số lớn hơn
Program HOC24;
var a,b: integer;
begin
write('Nhap a: '); readln(a);
write('Nhap b: '); readln(b);
if a>b then write(a,' lon hon ',b);
if a<b then write(b,' lon hon ',a);
if a=b then write('Hai so bang nhau');
readln
end.
Đúng 1
Bình luận (0)
Viết chương trình nhập n phần tử cho mảng a1..an là số nguyên. a. In mảng vừa nhập ra màn hình. b. In ra màn hình số lớn nhất
var a:array[1..1000] of integer;
i,n,max:integer;
begin
write('n = ');readln(n);
for i:=1 to n do
begin
write('Nhap phan tu thu ',i,' = ');readln(a[i]);
end;
max:=a[1];
for i:=2 to n do
if a[i]>max then max:=a[i];
write('So lon nhat la ',max);
readln
end.
Đúng 2
Bình luận (0)
Viết chương trình Pascal nhập vào 2 số a, b in ra màn hình số lớn hơn. Dùng câu lệnh if... then... else…
Giải chi tiết giúp mình nhé
Program solonhon;
var a,b: integer;
begin
write('Nhap a: '); readln(a);
write('Nhap b: '); readln(b);
if a> b then write(a);
if a<b then write(b);
if a=b then write('2 so bang nhau');
readln
end.
Đúng 2
Bình luận (0)
Program HOC24;
var a,b: integer;
begin
write('Nhap a: '); readln(a);
write('Nhap b: '); readln(b);
if a>b then write(a) else write(b);
readln
end.
Đúng 2
Bình luận (2)
uses crt;
var a,b:integer;
begin
clrscr;
readln(a,b);
if a>b then write(a)
else write(b);
readln;
end.
Đúng 1
Bình luận (0)
Viết chương trinh nhập ba số nguyên a, b, c:
Xuất ra màn hình số lớn hơn.Xuất ra màn hình số bé hơn.Xuất ra màn hình các số lớn hơn TBC của các số đó.Xuất ra màn hình các số bằng TBC của các số đó.ai giup minh voi
uses crt;
var a,b,c,ln,nn:integer;
tbc:real;
begin
clrscr;
readln(a,b,c);
ln:=a;
if ln<b then ln:=b;
if ln<c then ln:=c;
nn:=a;
if nn>b then nn:=b;
if nn>c then nn:=c;
writeln(ln);
writeln(nn);
tbc:=(a+b+c)/3;
if a>tbc then write(a,' ');
if b>tbc then write(b,' ');
if c>tbc then write(c,' ');
writeln;
if a=tbc then write(a,' ');
if b=tbc then write(b,' ');
if c=tbc then write(c,' ');
readln;
end.
Đúng 1
Bình luận (0)