cho mình hỏi là sao khi chạy chương trình này nó lại ra 50 được ko( đây là...
Đọc tiếp
cho mình hỏi là sao khi chạy chương trình này nó lại ra 50 được ko( đây là C)
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.
5 tháng 1 2022
Câu 1:
uses crt;
var i,t:integer;
begin
clrscr;
t:=0;
for i:=1 to 20 do
if i mod 4=0 then t:=t+i;
writeln(t);
readln;
end.
Câu 2:
uses crt;
var i,dem:integer;
begin
clrscr;
dem:=0;
for i:=1 to 20 do
if i mod 3=0 then dem:=dem+1;
writeln(dem);
readln;
end.
3 tháng 1 2022
Câu 1:
#include <bits/stdc++.h>
using namespace std;
int t,i;
int main()
{
t=0;
for (i=1; i<=20; i++)
if (i%4==0) t=t+i;
cout<<t;
return 0;
}
2:
#include <bits/stdc++.h>
using namespace std;
int i,dem;
int main()
{
dem=0;
for (i=1; i<=20; i++)
if ((i%2==1) and (i%3==0)) dem++;
cout<<dem;
return 0;
}
3 tháng 1 2022
#include <bits/stdc++.h>
using namespace std;
string st,a[1000];
int i,d,dem,j;
bool kt;
int main()
{
getline(cin,st);
d=st.length();
a[1]=st[0];
dem=1;
for (i=0; i<=d-1; i++)
{
kt=true;
for (j=1; j<=dem; j++)
if (a[j]==st[i]) kt=false;
if (kt==true)
{
dem++;
a[dem]=st[i];
}
}
for (i=1; i<=dem; i++) cout<<a[i]<<" ";
return 0;
}
3 tháng 1 2022
#include <bits/stdc++.h>
using namespace std;
long long s,i,n;
int main()
{
cin>>n;
s=0;
for (i=1; i<=n; i++)
if (i%3==0) s=s+i;
cout<<s;
return 0;
}
N
1
2 tháng 1 2022
b: uses crt;
var s,i:integer;
begin
clrscr;
s:=0;
for i:=1 to 5 do
s:=s+i;
writeln(s);
readln;
end.
2 tháng 1 2022
Bài 9:
uses crt;
var x,y,n:integer;
begin
clrscr;
readln(n);
x:=0;
y:=0;
while (x*x+y*y<>n) do
begin
x:=x+1;
y:=y+1;
end;
writeln(x,' ',y);
readln;
end.
2 tháng 1 2022
1:
uses crt;
var i,n:integer;
s:real;
begin
clrscr;
readln(n);
s:=0;
i:=1;
while (i<=n) do
begin
s:=s+1/i;
i:=i+1;
end;
writeln(s:4:2);
readln;
end.
2 tháng 1 2022
Bài 10:
uses crt;
var a,b:array[1..10000]of longint;
i,n,dem,j,dem1:longint;
kt:boolean;
begin
clrscr;
readln(n);
for i:=1 to n do readln(a[i]);
dem:=0;
b[1]:=a[1];
for i:=1 to n do
begin
kt:=true;
for j:=1 to dem do
if b[j]=a[i] then kt:=false;
if kt=true then
begin
dem:=dem+1;
b[dem]:=a[i];
end;
end;
writeln(dem);
for i:=1 to dem do
begin
dem1:=0;
for j:=1 to n do
if b[i]=a[j] then dem1:=dem1+1;
writeln(b[i],' xuat hien ',dem1,' lan');
end;
readln;
end.
tại vì là mã ascii của '2' là 50