Viết chương trình kiểm tra xem ngày tháng năm có hợp lệ hay không
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.
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.
uses crt;
var n:longint;
begin
clrscr;
write('Nhap nam: '); readln(n);
if n mod 4=0 then write('Day la nam nhuan')
else write('Day khong phai nam nhuan');
readln
end.
#include <bits/stdc++.h>
using namespace std;
long long n;
int main()
{
cin>>n;
if (n%4==0 && n%100!=0) cout<<"La nam nhuan";
else if (n%400==0) cout<<"La nam nhuan";
else cout<<"Khong la nam nhuan";
return 0;
}
#include <iostream>
using namespace std;
int main()
{
int a,b,c,kt;
cout<<"Nhap a=";
cin>>a;
cout<<"Nhap b=";
cin>>b;
cout<<"Nhap c=";
cin>>c;
if ((a>0) and (b>0) and (c>0) and (a+b>c) and (a+c>b) and (b+c>a))
{
kt=0;
if (a*a==b*b+c*c) kt=1;
if (b*b==a*a+c*c) kt=1;
if (c*c==a*a+b*b) kt=1;
if ((a==b) and ((a<c) or (a>c)) and ((b<c) or (b>c))) kt=2;
if ((b==c) and ((b<a) or (b>a)) and ((c<a) or (c>a))) kt=2;
if ((c==a) and ((c<b) or (c>b)) and ((a<b) or (a>b))) kt=2;
if ((a==c) and (b==c)) kt=3;
if (kt==2) cout<<"Day la tam giac can";
else cout<<"Day khong la tam giac can";
}
else cout<<"Day khong la ba canh trong mot tam giac";
return 0;
}
uses crt;
var a,b,c:real;
kt:integer;
begin
clrscr;
repeat
write('Nhap a='); readln(a);
write('Nhap b='); readln(b);
write('Nhap c='); readln(c);
until (a>0) and (b>0) and (c>0);
if (a+b>c) and (a+c>b) and (b+c>a) then
begin
kt:=0;
if (a=b) and (a<>c) and (b<>c) then kt:=1;
if (b=c) and (b<>a) and (c<>a) then kt:=1;
if (c=a) and (c<>b) and (a<>b) then kt:=1;
if kt=0 then writeln('Day khong la tam giac can')
else writeln('Day la tam giac can');
end
else writeln('Day khong la ba canh trong mot tam giac');
readln;
end.
def kiem_tra_so_ngay(thang):
if thang in [1, 3, 5, 7, 8, 10, 12]:
return 31
elif thang in [4, 6, 9, 11]:
return 30
elif thang == 2:
return "28 hoặc 29"
else:
return "Tháng không hợp lệ"
# Nhập tháng từ người dùng
thang = int(input("Nhập vào một số nguyên là tháng trong năm: "))
# Kiểm tra và xuất ra số ngày tương ứng
so_ngay = kiem_tra_so_ngay(thang)
print(f"Số ngày trong tháng {thang} là: {so_ngay} ngày.")
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.
uses crt;
var a,b,c:integer;
begin
clrscr;
readln(a,b,c);
if (a=b) and (b=c) then write('YES')
else write('NO');
readln;
end.
uses crt;
var a,b,c: integer;
begin
clrscr;
write('Nhap ngay; thang; nam :'); readln(a,b,c);
if (a>=1) and (a<=31) then write('Ngay hop le');
if (b>=1) and (b<=12) then write('Thang hop le');
if (c>=0) and (c<=2021) then write('Nam hop le');
readln
end.
uses crt;
var a,b,c: integer;
begin
clrscr;
write('Nhap ngay; thang; nam :'); readln(a,b,c);
if (a>=1) and (a<=31) then write('Ngay hop le');
if (b>=1) and (b<=12) then write('Thang hop le');
if (c>=0) and (c<=2021) then write('Nam hop le');
readln
end.