viet chương trinh nhap 2 so nguyen m,n từ bàn phím (n,m nguyen dương va nhỏ hon 1000) hay tim 2 và đưa ra màn hinh 2 số p,q mà p là tữ số q là mẫu số khi da tối giản
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.
Lời giải :
program hotrotinhoc ;
var a: array[1..32000] of integer ;
i,n,max : integer ;
begin
write('Nhap n='); readln(n);
writeln('Nhap gia tri cua cac phan tu');
for i:= 1 to n do
begin
write('a[',i,']='); readln(a[i]);
end;
max:=a[1];
for i:= 1 to n do if max<a[i] then max:=a[i];
write('So lon nhat la:',max');
readln
end.
#include <bits/stdc++.h>
using namespace std;
long long n;
int main()
{
cin>>n;
if (n<0) cout<<"la so am";
else cout<<"la so duong";
return 0;
}
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;
}
uses crt;
var n,i,t:integer;
begin
clrscr;
readln(n);
t:=0;
for i:=1 to n do
if i mod 2=1 then t:=t+i;
writeln(t);
readln;
end.
uses crt;
var n,i:integer;
m:real;
begin
clrscr;
repeat
write('Nhap n='); readln(n);
until (1<=n) and (n<=30000);
m:=0;
for i:=1 to n do
m:=m+sqrt(i);
writeln('m=',m:4:2);
readln;
end.
Bài 2:
#include <bits/stdc++.h>
using namespace std;
long long x,y;
int main()
{
cin >>x>>y;
cout<<x<<" "<<y;
swap(x,y);
cout<<x<<" "<<y;
return 0;
}
USES crt;
VAR n,m,p,q:integer;
Function UCLN(x,y:integer):integer;
Var i,t:integer;
Begin
for i:=1 to x do
if (x mod i=0) and (y mod i =0) then t:=i;
UCLN:=t;
End;
BEGIN
clrscr;
write('Nhap n:'); readln(n);
write('Nhap m:'); readln(m);
p:=n div UCLN(n,m); q:=m div UCLN(n,m);
write('Cap (p,q) la:',p,' ',q);
readln;
END.