Viết chương trình nhập vào 3 số a,b,c. Kiểm tra xem a,b, c có phải là tam giác cân hay không
Giải bởi Vietjack
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.
Gói VIP thi online tại VietJack (chỉ 400k/1 năm học), luyện tập gần 1 triệu câu hỏi có đáp án chi tiết
Yêu cầu: Cho 5 số kiểu 64 bit a, b, c, d, e. In ra YES nếu có ít nhất 4 số bằng nhau, in ra NO nếu không thỏa mãn.
Dữ liệu: Một dòng gồm 5 số nguyên a, b, c, d, e .
Kết quả: Ghi ra YES nếu có 4 số bằng nhau, ghi NO nếu ngược lại.
viết chương trình nhập vào 1 ký tự. in ra mã ASCII của ký tự đó và in ra ký tự kế tiếp của nó
viết chương trình pascal nhập 3 số a,b,c; kiểm tra xem nó có phải đọ dài 3 cạnh 1 tam giác hay không rồi in ra màn hình, nếu là 3 cạnh tam giác thì tính chu vi của tam giác đó
Viết chương trình nhập vào một xâu ký tự từ bàn phím. Đổi xâu ký tự đó sang chữ in hoa rồi in kết quả ra màn hình.
Ví dụ :Xâu abcdAbcD sẽ cho ra xâu ABCDABCD.
Viết chương trình nhập vào một xâu ký tự từ bàn phím. Đổi xâu ký tự đó sang chữ thường rồi in kết quả ra màn hình.
Ví dụ :Xâu abCdAbcD sẽ cho ra xâu abcdabcd.
viết chương trình nhập vào 1 dãy số nguyên gồm n phần tử. Tính tổng là các số chẵn và in các phần tử đó lên màn hình
Viết chương trình nhập vào 3 số a b c tìm số lớn nhất số bé nhất trong ba số đó c++
Nhập vào một số tự nhiên N. Hãy tính tổng các chữ số của nó.
Ví dụ: N = 1682. Tong cac chu so cua N la: 17 ( = 1 + 6 + 8 + 2 )
