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.
Giải bởi Vietjack
Uses Crt;
Var St:String;
i:Byte;
Begin
Write(‘Nhap xau St: ‘); Readln(St);
For i:=1 to length(St) do
If St[i] IN [‘A’..’Z’] Then St[i]:=CHR(ORD(St[i])+32);
Write(‘Xau ket qua: ‘, St);
Readln;
End.
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ó
Giả sử một bức ảnh được chụp bằng một máy ảnh chuyên nghiệp có dung lượng khoảng 12MB. Vậy một thẻ nhớ 16GB có thể chứa bao nhiêu bức ảnh như vậy?
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.
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 một xâu ký tự từ bàn phím. Thông báo lên màn hình các chữ cái có trong xâu và số lượng của chúng ( Không phân biệt chữ hoa hay chữ thường).
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++
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 3 số a,b,c. Kiểm tra xem a,b, c có phải là tam giác cân hay không
Nhập vào một dãy NN số nguyên A1,A2,...,ANA1,A2,...,AN (N≤10000,|Ai|≤109N≤10000,|Ai|≤109).
Hãy in ra màn hình Trung bình cộng các phần tử âm.
Dữ liệu vào:
Dòng đầu tiên chứa số NN
Dòng thứ 2 chứa NN số nguyên A1,A2,...,ANA1,A2,...,AN.
Kết quả:
In ra Trung bình cộng các phần tử âm lấy 2 số lẻ sau phần thập phân, nếu trong dãy không có số âm nào thì in ra −1−1.
Sample Input
Copy
7 7 6 -4 19 -22 51 -82
Sample Output
Copy
-36.00
Lưu ý :dung C++
Tính S(n)= 1 + (1+2)/2! + (1+2+3)/3! + ... + (1+2+3+..+n)/n! (n>0)
