Hãy viết chương trình nhập vào từ bàn phím một số X , nếu X lớn hơn 0 thì xuất ra màn hình X là số dương ngược lain xuất ra màn hình X là số âm
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.
Những câu hỏi liên quan
22 tháng 12 2020
uses crt;
var x,y:integer;
begin
clrscr;
write('Nhap x='); readln(x);
write('Nhap y='); readln(y);
if x>y then writeln(x-y)
else writeln(x+y);
readln;
end.
22 tháng 12 2020
uses crt;
var x,y:integer;
begin
clrscr;
write('Nhap x='); readln(x);
write('Nhap y='); readln(y);
if x>y then writeln(x-y)
else writeln(x+y);
readln;
end.
18 tháng 3 2021
uses crt;
var a,b:integer;
begin
clrscr;
write('Nhap a='); readln(a);
write('Nhap b='); readln(b);
if a>b then writeln(a)
else writeln(b);
readln;
end.
17 tháng 5 2021
uses crt;
var x,y:integer;
begin
clrscr;
write('Nhap x='); readln(x);
write('Nhap y='); readln(y);
writeln(x+y);
readln;
end.
16 tháng 12 2022
uses crt;
var n,x,i,lt,gt:int64;
begin
clrscr;
readln(n);
gt:=1;
for i:=1 to n do gt:=gt*i;
writeln(gt);
readln(x);
lt:=1;
for i:=1 to x do
lt:=lt*n;
writeln(lt);
readln;
end.
ML
15 tháng 3 2021
Program HOC24;
var m,i,d: integer;
a: array[1..32000] of integer;
begin
write('Nhap m= '); readln(m);
for i:=1 to m do
begin
write('A[',i,']='); readln(a[i]);
end;
write('Nhap X = '); readln(x);
d:=0;
for i:=1 to n do if a[i]=x then d:=d+1;
write(X,' xuat hien ',d,' lan trong mang');
readln
end.
#include <bits/stdc++.h>
using namespace std;
double x;
int main()
{
cin>>x;
if (x>0) cout<<"X la so duong";
else cout<<"X la so am";
return 0;
}