Các số tự nhiên từ 10 đến 99 đượ xép thành 101112....9899. Cho trước số tự nhiên k (1<=k<=100). Lập phương trình tính số thứ tự của k từ trái qua phải
1 câu trả lời
uses crt;
var k:longint;
begin
clrscr;
write('Nhap k: ');readln(k);
if k<10 then writeln(1) else
if k=100 then writeln('Khong co') else
writeln(k-10+1);
readln
end.
Câu hỏi trong lớp
Xem thêm