LQ
3
K
Khách
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.
Các câu hỏi dưới đây có thể giống với câu hỏi trên
25 tháng 2 2023
uses crt;
var n,i,dem:integer;
begin
clrscr;
readln(n);
dem:=0;
for i:=1 to n do
if i mod 7=0 then inc(dem);
write(dem);
readln;
end.
5 tháng 4 2023
program Dem_Chia_Het;
var s, i: longint;
begin
s := 0;
for i := 10 to 2000 do
begin
if i mod 297 = 0 then // Kiểm tra chia hết cho 9, 3, 11
s := s + 1;
end;
writeln('So luong cac so chia het cho 9, 3 va 11 la: ', s);
end.
6 tháng 4 2023
count = 0
for i in range(10, 2001):
if i % 3 == 0 and i % 9 == 0 and i % 11 == 0:
count += 1
print(count)
6 tháng 3 2023
n = int(input('Nhập số n: '))
sum = 0
i = 1
while i <= n:
if i % 2 == 0:
sum += i
print(i, end=' ')
i += 1
print()
print('Tổng các số chẵn từ 1 đến n là:', sum)
VT
6 tháng 3 2023
n = int(input('Nhập số n: '))
sum = 0
i = 1
while i <= n:
if i % 2 == 0:
sum += i
print(i, end=' ')
i += 1
print()
print('Tổng các số chẵn từ 1 đến n là:', sum)
CK
1
25 tháng 4 2023
n = int(input("Nhap vao mot so n: "))
tong = 0
for i in range(1, n):
if i % 3 == 0:
tong += i
print("Tong cac so chia het cho 3 tu 1 den", n-1, "la:", tong)
NB
26 tháng 4 2023
program Tong;
var
n: integer;
i: integer;
sum: real;
begin
write('Nhap so nguyen duong n (chia het cho 5): ');
readln(n);
sum := 0;
for i := 1 to n do
begin
if i mod 5 = 1 then
sum := sum + 1/i;
end;
writeln('Tong A la: ', sum);
readln;
end.
H
3
4 tháng 10 2021
#include <bits/stdc++.h>
using namespace std;
int main()
{
long a,b,x,dem,i;
cout<<"a="; cin>>a;
cout<<"b="; cin>>b;
cout<<"x="; cin>>x;
dem=0;
for (i=a; i<=b; i++)
if (i%x==0) dem++;
cout<<dem;
return 0;
}
KV
4 tháng 5 2023
var s:real;
i,n,t:integer;
begin
repeat
write('Nhap n > 0 va n chia het cho 5 ');readln(n);
until (n > 0) and (n mod 5 = 0);
t:=round(n/5);
s:=1;
for i:=1 to t do
s:=s+1/(5*i);
write('A = ',s:10:2);
readln
end.
program Bai1;
n, i, d: integer ;
A: array [1..1000] of integer;
write(‘ nhap so n:’);
for i: = 1 to n do:
writeln(‘so han thu A[‘,i,’]=’);
read(A[i]);
n có chia hết cho 2