Cho số nguyên dương n. Hãy lập trình tìm số 9 phương có giá trị gần n nhất ( 0<n<= 10^9) Vd SCP.INP SCP.OUT 17 16 28 25 PASCAL NHA ai giúp với
1 câu trả lời
uses crt;
var n: longint;
function cp(n: longint): boolean;
begin
exit(n = sqr(trunc(sqrt(n))));
end;
begin
clrscr;
readln(n);
while cp(n) = false do dec(n);
writeln(n);
readln;
end.
- Đề 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
