1. Kết quả của biến sau chương trình: a) i:=1; j:=1; k:=3; While i<7 do i:=i+1; j:=j+2; k:=k*i; b) i:=1; j:=3; k:=4; While i<=5 do begin i:=i+1; j:=j*i; k:=k+j; end; c) j:=1; k:=3; for i:=1 to 5 do begin j:=j+i; k:=k+j; end; 2. Viết chương trình nhập vào dãy số nguyên. Với độ dài từ bàn phím rồi in ra số chẵn mà chia hết cho 3
1 câu trả lời
2,
Viết chương trình :
Program songuyen;
uses crt;
var i,n: integer;
a: array [1..100] of integer;
begin
write('nhap so n:'); readln(n);
for i:=1 to n do
begin
write('a[',i,']='); readln(a[i]);
end;
writeln('nhung so chia het cho 3 trong day la:');
for i:=1 to n do
if a[i] mod 3 = 0 then
writeln(a[i]);
readln;
end.
1,mik ko bt xl
Bn vote và cảm ơn dc ko
Chúc bạn thành công ??
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
