Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
a=int(input('Nhập a='))
if (a%3 ==0) and (a%5 ==0):
print(a, 'Chia hết cho 3 và 5')
else
print(a, 'Không chia hết cho 3 và 5')
1:
readln(n);
if n mod 2<>0 then t:=t*n
write('t=',t);
readln;
Chương trình sẽ bị lỗi vì thiếu dấu ; ở chỗ sau write('dung')
=> Chọn C
a)
PROGRAM BAI1a;
VAR N, Tle, Tchan: integer;
BEGIN
Write ('Nhap N =');
Readln (N);
If (N mod 2) = 0 Then
Tle := N*((N - 2)/2 + 1)/2;
Tchan := (N + 2)*((N - 2)/2 + 1)/2;
If (N mod 2) = 1 Then
Tle := (N + 1)*((N-1)/2 +1)/2;
Tchan := (N + 1)*((N - 3)/2 + 1)/2;
WRITELN ('Sle =', Sle, 'Schan =', Schan);
READLN;
END.
