Help meee!!!! Làm trong pascal Viết chương trình nhập vào một dãy gồm N số nguyên (N < 100). a/In ra các số nguyên tố trong dãy, cho biết có bao nhiêu số ? b/In ra hai số trong dãy sao cho tích của chúng là lớn nhất.
1 câu trả lời
program ct;
uses crt;
var N, i:Integer;
begin
clrscr;
writeln('Nhap N:'); readln(N);
writeln;writeln;
for i:= 1 to N do
write(i,' ');
writeln;writeln;
writeln('Hai so co tich lon nhat trong day so tren la: ',i-1,' va ',i,' co tich la ',(i-1)*i);
readln;
end.
____________________________________________________________
#Duahauvn
#HocTot
#ThiTot
- Đề 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
