Câu1. hãy viết chương trình nhập vào 1 số tự nhiên n với(0<n<=65353).lập trình thực hiện các công việc sau:
-yêu cầu cho biết chữ số lớn nhất của số tự nhiên vừa nhập, in ra màn hình số đảo ngược của số vừa được nhập vào từ bàn phím.
-Dữ liệu vào: nhập từ bàn phím dòng đầu đọc vào số tự nhiên n.
-kết quả ra: xuất ra trên màn hình 2 dòng:
+ dòng thứ nhất : chữ số lớn nhất.
+ dòng thứ 2: số đảo ngược của số nhập vào từ bàn phím.
vd:-dữ liệu vào: 2016
-kết quả ra: +chu so lon nhat: 6
+ so dao nguoc: 6102.
Câu 2. trong bến xe có n xe gồm X xe tãi và Y xe lam(1<=X,Y,n<=100). người ta đém thấy có tất cả k.(1<=k<=32000) k là số bánh xe.
yêu cầu: hỏi có bao nhiêu xe taxi và bo nhiêu xe lam trong bến(biết rằng xe tãi có 4 bánh và xe lam có 3 bánh).
-Dữ liệu vào: nhập từ bàn phím với cấu trúc gồm 2 dòng như sau:
+ dòng đàu chứa số n.
+ dòng thứ 2 chứa số k.
+ kết quả ra: xuất ra màn hình trên cùng 1 dòng số lượng từng loại xe theo thứ tự là taxi rồi đến xe lam, các con số được cách nhau 1 khoảng trắng. nếu ko tìm được kết quả in ra màn hình thông báo 'du lieu nhap vao khong dung!'.
vd:- dữ liệu vào:7
25
-kết quả ra: 4 3
Bằng cách nhấp vào Đăng nhập, bạn đồng ý Chính sách bảo mật và Điều khoản sử dụng của chúng tôi. Nếu đây không phải máy tính của bạn, để đảm bảo an toàn, hãy sử dụng Cửa sổ riêng tư (Tab ẩn danh) để đăng nhập (New Private Window / New Incognito Window).
Program hotrotinhoc;
var i,n,s,k,max,n1: longint;
begin
write('Nhap N='); readln(n);</p><p>max:=0; n1:=n;</p><p>while n<>0 do</p><p>begin</p><p>k:=n mod 10;</p><p>s:=s*10+k;</p><p>n:=n div 10;</p><p>if k>max then max:=k;</p><p>end;</p><p>writeln('Chu so lon nhat cua so tu nhien vua nhap la :',max);
If s=n1 then write('La so doi xung') else write('Khong phai so doi
xung');
readln
end.
Hôm nay bạn thế nào? Hãy nhấp vào một lựa chọn, nếu may mắn bạn sẽ được tặng 50.000 xu từ Lazi
Vui | Buồn | Bình thường |