từ 1 đến 2013 có bao nhiêu số đồng dư với 1 theo moder 4 viết quy trình bấm phím các số đó
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.
Những câu hỏi liên quan
9 tháng 3 2023
program dem_so_chia_het_cho_5;
uses crt;
var
N, count, i: integer;
begin
clrscr;
write('Nhap so nguyen N: ');
readln(N);
count := 0;
for i := 1 to N do
begin
if (i mod 5 = 0) then
begin
count := count + 1;
end;
end;
writeln('Co ', count, ' so nguyen chia het cho 5 tu 1 den ', N);
readln;
end.
TC
16 tháng 3 2022
tham khảo
program tinhoc;
uses crt;
var n,dem,tich:integer;
a: array[1..1000] of integer;
begin
clrscr;
writeln('Nhap so phan tu cua day: ');readln(n);
writeln('Nhap ',n,' phan tu cua day: ');
for i:= 1 to n do readln(a[i]);
dem:=0; tich:=1;
for i:= 1 to n do if a[i] mod 2 = 0 then begin dem:=dem+1; tich:=tich*a[i] end;
writeln('Co ',dem,' phan tu chan trong day');
writeln('Tich cua cac so chan trong day la: ',tich);
readln
end.
16 tháng 3 2022
#include <bits/stdc++.h>
using namespace std;
long long x,n,i,dem;
int main()
{
cin>>n;
dem=0;
for (i=1; i<=n; i++)
{
cin>>x;
if (x>0) dem++;
}
cout<<dem;
return 0;
}
20 tháng 3 2022
Câu 1:
uses crt;
var s,i,n:integer;
begin clrscr;
s:=0;
write('Nhap n: ');readln(n);
for i:=1 to n do
if i mod 2 <> 0 then inc(s,i);
write('Tong cac so le tu 1 den ',n,' la: ',s);
readln
end.
20 tháng 3 2022
Câu 2:
uses crt;
var s,i,n:integer;
begin clrscr;
s:=0;
write('Nhap n: ');readln(n);
for i:=1 to n do
if i mod 2 = 0 then inc(s,i);
write('Tong cac so le tu 1 den ',n,' la: ',s);
readln
end.
24 tháng 12 2021
#include <bits/stdc++.h>
using namespace std;
long long n,i,a[1000];
int main()
{
cin>>n;
for (i=1; i<=n; i++) cin>>a[i];
sort(a+1,a+n+1);
for (i=n; i>=1; i--) cout<<a[i]<<" ";
return 0;
}
LT
1
4 tháng 4 2022
#include <bits/stdc++.h>
using namespace std;
long long x,i,n=4,dem;
int main()
{
dem=0;
for (i=1; i<=n; i++)
{
cin>>x;
if (x%2==0) dem++;
}
cout<<dem;
return 0;
}