viết chương trình tìm tất cả các ước không âm của n,với n nhập từ bàn phím
2 câu trả lời
program hotboy;
uses crt;
var n,i:integer;
begin
clrscr;
write('nhao so n tu ban phim ');
readln(n);
for i:=1 to n do
if n mod i=0 then write(i,'la uoc cua ',n);
readln
end.
Program UKA;
Uses crt;
Var n,i:longint;
Begin
Clrscr;
Write('Nhap n: '); Readln(n);
For i:=1 to n div 2 do
If n mod i = 0 then write(i:5);
Readln
End.
Câu hỏi trong lớp
Xem thêm
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết giúp các em luyện tập và củng cố kiến thức hiệu quả
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 5 Địa 8 có lời giải chi tiết
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 4 Địa 8 có lời giải chi tiết
