làm bằng pascal giúp mình với ạ
Câu 1 (6,0 điểm) DÉM Cho số hai số nguyên dương N x (x< NS 1018) Yêu cầu: Đếm số lượng các số nguyên dương bé hơn hoặc bằng N mà không chia hết cho x. Dữ l
Lời giải 1 :
uses crt;
var N,x: qword;
begin
assign(input, 'DEM.INP'); reset(input);
assign(output, 'DEM.OUT'); rewrite(output);
readln(N, x);
write(n - (n div x));
end.
Bạn có biết?
Tin học là một ngành khoa học chuyên nghiên cứu quá trình tự động hóa việc tổ chức, lưu trữ, xử lý và truyền dẫn thông tin của một hệ thống máy tính cụ thể hoặc trừu tượng. Tin học bao hàm tất cả các nghiên cứu và kỹ thuật có liên quan đến việc mô phỏng, biến đổi và tái tạo thông tin. Hãy tận dụng sức mạnh của tin học để giải quyết các vấn đề và sáng tạo ra những giải pháp mới!
Nguồn :
Wikipedia - Bách khoa toàn thưTâm sự lớp 10
Lớp 10 - Năm đầu tiên ở cấp trung học phổ thông, chúng ta sẽ có nhiều bạn bè mới đến từ những nơi khác nhau. Ngôi trường mới, xa nhà hơn, mở ra một thế giới mới với nhiều điều thú vị. Hãy mở lòng đón nhận và tận hưởng những trải nghiệm mới!
Nguồn :
sưu tậpCó thể bạn quan tâm
Tin Học
Lớp 10
Nhập vào một dãy NN số nguyên A1,A2,...,AN Hãy in ra màn hình số lượng phần tử dương và tổng của chúng. câu hỏi 7229933 ...Tin Học
Lớp 10
Cho số nguyên N, hãy kiểm tra nếu tất cả các chữ số của N là số lẻ thì in ra AllOdd ngược lại in ra Even Đầu vào Dòng duy nhất chứa N Giới hạn 0<=N<=10^ ...Copyright © 2024 Giai BT SGK