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.
Bài 1:
Program HOC24;
var x,t: byte;
begin
write('Nhap so co 2 chu so: '); readln(x);
t:=(x mod 10)+(x div 10);
write('Tong 2 chu so cua so do la: ',t);
readln
end.
Viết chương trình nhập vào số nguyên n và tính tổng các số lẻ (các số lẻ là số không chia hết cho 2) trong khoảng từ 1 đến n ( ví dụ nhập = 10, ta sẽ có tổng sau s=1+3+5+7+9=25)
uses crt;
var i,n,s:integer;
begin
clrscr;
write('Nhap n='); readln(n);
s:=0;
for i:=1 to n do
if i mod 2=1 then s:=s+i;
writeln(s);
readln;
end.
uses crt;
var n,i,d,dem,kt,t,kt1,t1,t2,t3,max,min,x,j:integer;
a,b:array[1..100]of integer;
st:string;
begin
clrscr;
write('Nhap n='); readln(n);
str(n,st);
d:=length(st);
for i:=1 to d do
val(st[i],a[i],x);
dem:=1;
b[1]:=a[1];
for i:=1 to d do
begin
kt:=0;
for j:=1 to dem do
if a[i]=b[j] then kt:=1;
if kt=0 then
begin
inc(dem);
b[dem]:=a[i];
end;
end;
writeln('Cac chu so cua ',n,' la: ');
for i:=1 to dem do
write(b[i]:4);
writeln;
t:=0;
for i:=1 to d do
t:=t+a[i];
writeln('Tong cac chu so cua ',n,' la: ',t);
kt1:=0;
for i:=2 to trunc(sqrt(t)) do
if t mod i=0 then
begin
kt1:=1;
break;
end;
if (kt1=0) and (t>1) then writeln(t,' la so nguyen to')
else writeln(t,' khong la so nguyen to');
writeln('Cac chu so o vi tri le cua ',n,' la: ');
t1:=0;
for i:=1 to d do
if i mod 2=1 then
begin
write(a[i]:4);
t1:=t1+a[i];
end;
writeln;
writeln('Tong cac chu so o vi tri le la: ',t1);
if trunc(sqrt(t1))=sqrt(t1) then writeln(t1,' la so chinh phuong')
else writeln(t1,' khong la so chinh phuong');
writeln('Cac chu so o vi tri chan cua ',n,' la: ');
t2:=0;
for i:=1 to d do
if i mod 2=0 then
begin
write(a[i]:4);
t2:=t2+a[i];
end;
writeln('Tong cac chu so o vi tri chan la: ',t2);
t3:=0;
for i:=1 to t2 do
if t2 mod i=0 then t3:=t3+i;
if (t3=t2) and (t2>0) then writeln(t2,' la so hoan hao')
else writeln(t2,' khong la so hoan hao');
max:=a[1];
min:=a[1];
for i:=1 to d do
begin
if max<a[i] then max:=a[i];
if min>a[i] then min:=a[i];
end;
writeln('Chu so lon nhat cua ',n,' la: ',max);
writeln('Chu so nho nhat cua ',n,' la: ',min);
writeln('Tong cua chung la: ',max+min);
readln;
end.
ko bt lm
Bài 1:
#include <bits/stdc++.h>
using namespace std;
int a,dv,ch;
int main()
{
cin>>a;
dv=a%10;
ch=a/10;
cout<<dv+ch;
return 0;
}
Tham khảo
Đầu tiên chúng ta cần khai báo biến n kiểu int, sau đó yêu cầu người dùng nhập giá trị cho n.
Tiếp đến là ta chia lấy dư n cho 10 để lấy hàng đơn vị. Để lấy được hàng chục ta chia lấy nguyên cho 10 rồi sau đó chia lấy dư cho 10 (b = (n / 10) % 10).
Hàng trăm sẽ bằng n chia lấy nguyên cho 100.
Sau khi đã có được hàng trăm, hàng chục và hàng đơn vị, ta sử dụng switch..case để đọc theo hàng trăm, hàng chục và hàng đơn vị.
Tham khảo
Đầu tiên chúng ta cần khai báo biến n kiểu int, sau đó yêu cầu người dùng nhập giá trị cho n.
Tiếp đến là ta chia lấy dư n cho 10 để lấy hàng đơn vị. Để lấy được hàng chục ta chia lấy nguyên cho 10 rồi sau đó chia lấy dư cho 10 (b = (n / 10) % 10).
Hàng trăm sẽ bằng n chia lấy nguyên cho 100.
Sau khi đã có được hàng trăm, hàng chục và hàng đơn vị, ta sử dụng switch..case để đọc theo hàng trăm, hàng chục và hàng đơn vị nha
#include <bits/stdc++.h>
using namespace std;
long long n,i;
int main()
{
cin>>n;
for (i=1; i<=n; i++)
if (i%3==0) cout<<i<<" ";
return 0;
}
#include <bits/stdc++.h>
using namespace std;
long long n,i;
int main()
{
cin>>n;
for (i=1; i<=n; i++)
if (i%3==0) cout<<i<<" ";
return 0;
}
#include <bits/stdc++.h>
using namespace std;
long long n,i;
int main()
{
cin>>n;
for (i=1; i<=n; i++)
if (i%3==0) cout<<i<<" ";
return 0;
}
