viết chương trình pascal
cho 3 đoạn có độ dài a,b,c. xét xem 3 đoạn có thể là độ dài của 1 tam giác đều ko?
tin 8
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.
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")
Cau 3:
var n:integer;
begin
read(n);
if n mod 4=0 then write('Nam ',n,' co 366 ngay')
else write('Nam ',n,' co 365 ngay');
end.
Cau 4:
var a,b,c:integer;
begin
read(a);
read(b);
read(c);
if (a+b>c) and (a+c>b) and (b+c>a) then write('Co the tao thanh mot tam giac')
else write('Khong the tao thanh mot tam giac');
readln;
end.
Cau 6:
var n,i:integer;
begin
read(n);
for i:=1 to n do
if n mod i=0 then write(i,' ');
readln;
end.
uses crt;
var a,b,c:real;
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
writeln('La do dai ba canh cua tam giac');
writeln('Chu vi tam giac la: ',a+b+c:4:2);
end
else writeln('Khong phai la do dai 3 canh cua tam giac');
readln;
end.
bạn ơi bạn có thể giải thích giúp mình repeat, until là gì không ạ và hình như chương trình của bạn mình nghĩ chắc đúng rồi đó nhưng bạn xét dùm mình xem chỗ var a,b,c,CV:word thì có đúng kh ạ
#include <bits/stdc++.h>
using namespace std;
double a,b,c;
int main()
{
cin>>a>>b>>c;
if (a>0 && b>0 && c>0 && a+b>c && a+c>b &&b+c>a) cout<<"phai";
else cout<<"ko phai";
return 0;
}
#include <bits/stdc++.h>
using namespace std;
double a,b,c;
int main()
{
cin>>a>>b>>c;
if (a>0 && b>0 && c>0 && a+b>c && a+c>b &&b+c>a) cout<<"phai";
else cout<<"ko phai";
return 0;
}
#include <bits/stdc++.h>
using namespace std;
int main() {
double a, b, c;
cin >> a >> b >> c;
if(a==b)
{if (b!=c) {cout << "Ba so da nhap la do dai ba canh cua mot tam giac can";}
if(b==c) {cout << "Ba so da nhap la do dai ba canh cua mot tam giac deu";}}
if(b==c)
{if(a!=b) {cout << "Ba so da nhap la do dai ba canh cua mot tam giac can";}}
if(a==c)
{if(a!=b) {cout << "Ba so da nhap la do dai ba canh cua mot tam giac can";}}
if(a!=b)
{if(b!=c) {cout << "Ba so da nhap khong la do dai ba canh cua mot tam giac can";}}
return 0;
}
Chúc bn học tốt! (Bonus thêm trường hợp không là độ dài tam giác cân và là độ dài của tam giác đều nha!)
Program HOC24;
var a,b,c: integer;
begin
write('Nhap canh thu nhat AB: '); readln(a);
write('Nhap canh thu hai BC: '); readln(b);
write('Nhap canh thu ba CA: '); readln(c);
if a*a+c*c=b*b then write('Tam giac vuong tai A');
if a*a+b*b=c*c then write('Tam giac vuong tai B');
if b*b+c*c=a*a then write('Tam giac vuong tai C');
readln
end.
47837894237
ko