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.
Program Marble_Top;
uses crt;
var i,n,t:integer;
begin
write('nhap n '); readln(n);
for i:= 1 to n do
if i*i =n then t:= t+1;
if t=1 then write (n, ' la so chinh phuong') else write (n, ' khong la so chinh phuong');
readln
end.
var a:integer;
begin
readln(a);
if sqr(trunc(sqrt(a)))=a then
writeln('la so chinh phuong') else writeln('khong la so chinh phuong');
end.
#include <iostream>
using namespace std;
int main()
{
int a, b, c;
cout << "Nhap a!"; cin >> a;
cout << "Nhap b!"; cin >> b;
cout << "Nhap c!"; cin >> c;
((a + b) > c && (a + c) > b && (b + c) > a)?
cout << "Co! Ba So" << " " << a << " " << b << " " << c << " Tao Thanh Ba Do Dai Canh Cua Mot Hinh Tam Giac!" :
cout << "Khong! Ba So" << " " << a << " " << b << " " << c << " Khong Tao Thanh Ba Do Dai Canh Cua Mot Hinh Tam Giac!";
}
program tamgiac;
uses crt;
var a,b,c:integer;
begin
clrscr;
writeln('nhap ba canh cua tam giac'); readln(a,b,c);
if a+b>c and a+c>b and b+c>a then write(a,' ',b,' ',c 'la ba canh cua tam giac') else write(a,' ',b,' ',c 'khong la ba canh cua tam giac');
readln
end.
Thuật toán:
-Bước 1: Nhập n
-Bước 2: Nếu \(\sqrt{n}=trunc\left(\sqrt{n}\right)\) thì n là số chính phương
không thì n không phải là số chính phương
-Bước 3: Kết thúc.
Viết chương trình
uses crt;
var n:integer;
begin
clrscr;
write('Nhap n='); readln(n);
if n<0 then writeln(n,' khong la so chinh phuong')
else begin
if sqrt(n)=trunc(sqrt(n)) then writeln(n,' la so chinh phuong')
else writeln(n,' khong la so chinh phuong');
end;
readln;
end.
#include<iostream>
using namespace std;
int main() {
double a, b, c;
cout << "Canh 1: "; cin >> a;
cout << "Canh 2: "; cin >> b;
cout << "Canh 3: "; cin >> c;
if (a > 0 && b > 0 && c > 0) {
if (a < b + c || b < a + c || c < a + b) {
cout << "Day la do dai ba canh cua mot tam giac";
} else {
cout << "Day khong phai do dai ba canh cua mot tam giac";
}
}else {
cout << "Do dai cac canh cua mot tam giac phai lon hon 0";
}
return 0;
}
a = float(input("Nhap a : "))
b = float(input("Nhap b : "))
c = float(input("Nhap c : "))
if a+b>c and a+c>b and b+c>a:
if a==b or a==c or b==c:
if a==c==b:
print("Day la ba canh cua tam giac deu")
else:
print("Day la ba canh cua tam giac can")
elif (a**2)+(b**2)==c**2 or (a**2)+(c**2)==b**2 or (c**2)+(b**2)==a**2:
print("Day la ba canh cua tam giac vuong")
else:
pass
else:
print("Day khong phai ba canh cua tam giac")
uses crt;
var a,x:longint;
{------------------ham-kiem-tra-so-nguyen-to---------------}
function ktnt(x:longint):boolean;
var kt:boolean;
i:longint;
begin
kt:=true;
for i:=2 to trunc(sqrt(x)) do
if x mod i=0 then
begin
kt:=false;
break;
end;
if kt=true then ktnt:=true
else ktnt:=false;
end;
{---------------chuong-trinh-chinh-------------------}
begin
clrscr;
repeat
write('Nhap a='); readln(a);
until a>10;
if ktnt(a)=true then
begin
x:=a;
repeat
a:=a div 10;
if ktnt(a)=true then a:=a div 10;
until a<10;
if (ktnt(a)=true) and (a>1) then writeln(x,' la so sieu nguyen to')
else writeln(x,' khong la so sieu nguyen to');
end
else writeln(a,' khong la so sieu nguyen to');
readln;
end.
#include <bits/stdc++.h>
using namespace std;
long long a,b,t;
int main()
{
cin>>a>>b;
t=a*b;
if ((t%5==0) or (t%8==0)) cout<<"YES";
else cout<<"NO";
}
#include <bits/stdc++.h>
using namespace std;
long long a,b;
//chuongtrinhcon
long long ucln(long long a,long long b)
{
if (b==0) return(a);
else return(ucln(b,a%b));
}
int main()
{
cin>>a>>b;
if (ucln(a,b)==1) cout<<"Toi gian";
else cout<<"Khong toi gian";
return 0;
}