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.
program bai1;
uses crt;
var n,tong,a,dem,i,t:longint;
j:integer;
s,s1:string;
function demcs(n:longint):longint;
begin
dem:=0;
while n <>0 do
begin
dem:=dem+1;
n:=n div 10;
end;
demcs:=dem;
end;
begin
clrscr;
write('nhap n:');readln(n);
a:=sqr(n);
dem:=0;
while a<>0 do
begin
if a mod 10 =3 then dem:=dem+1;
a:=a div 10;
end;
if dem=0 then writeln('trong so ',sqr(n),' khong co chu so 3 nao')
else
writeln('trong so ', sqr(n),' co ',dem,' chu so 3');
if demcs(n)<>1 then
begin
str(n,s);
s1:=s[length(s)];
for i:=2 to length(s)-1 do s1:=s1+s[i];
s1:=s1+s[1];
val(s1,a,j);
end
else a:=n;
tong:=n+a;
write('tong cua so ban dau va so moi la:',tong);
readln;
end.
*đây là bài 1, còn bài 2 để mai mk giải cho, khuya r
program TimBoi4ChuSo;
var
n, i: integer;
begin
repeat
writeln('Nhap vao so nguyen n (2<n<100): ');
readln(n);
until (n > 2) and (n < 100);
writeln('Cac boi cua ', n, ' co 4 chu so la: ');
for i := 1000 to 9999 do
begin
if i mod n = 0 then
writeln(i);
end;
end.
Mình sẽ tạm hiểu đề này là viết chương trình in ra các số nguyên tố lớn hơn hoặc bằng n nha
#include <bits/stdc++.h>
using namespace std;
int n,m,i;
//chuongtrinhcon
bool ktnt(int n)
{
if (n<2) return false;
for (int i=2; i*i<=n; i++)
if (n%i==0) return false;
return true;
}
int main()
{
cin>>n;
cout<<"Cac so nguyen to nho hon bang n thoa man yeu cau la"<<endl;
for (int i=2; i<=n; i++)
if (ktnt(i)) cout<<i<<" ";
}
program MultiplesOfN;
var
n, i: integer;
begin
repeat
write('Nhap vao so nguyen duong n (0<n<100): ');
readln(n);
until (n > 0) and (n < 100);
writeln('Cac boi so cua ', n, ' co 4 chu so la:');
for i := 1000 to 9999 do
begin
if (i mod n = 0) then
begin
writeln(i);
end;
end;
readln;
end.
Var i,n:integer;
s:longint;
Begin
Write('n = ');readln(n);
For i:=1 to n do
s:=s+i;
Write('Tong la ',s);
Readln;
End.
Câu hỏi của Hồ Đức Thiện - Tin học lớp 8 | Học trực tuyến
-đưa sang dạng xâu rồi chạy for tìm được cuối với đầu
-cách 2 thì: lấy nó chia dư cho 10 thì thu dc số cuối , chia nguyên nó cho 10 cho đến khi nó nhỏ hơn 10 thì dừng :v