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 b1;
uses crt;
var i: integer; a:array[1..100] of integer; s:longint;
begin
clrscr;
for i:=1 to 10 do
begin
write('a[',i,']='); readln(a[i]);
end;
writeln('cac phan tu chan la:');
s:=0;
for i:=1 to 10 do if a[i] mod 2=0 then writeln(a[i],' ');
write('Tong cac phan tu le la:');
for i:=1 to 10 do if a[i] mod 2<>0 then s:=s+a[i]; write(s);
readln;
end.
Tham khảo!
uses crt;
var a:array[1..100]of integer;
i,n,t,kt,j:integer;
begin
clrscr;
readln(n);
for i:=1 to n do readln(a[i]);
t:=0;
for i:=1 to n do
if a[i] mod 2<>0 then t:=t+a[i];
writeln(t);
for i:=1 to n do
if trunc(sqrt(a[i]))=sqrt(a[i]) then write(a[i]:4);
writeln;
for i:=1 to n do
if a[i]>1 then
begin
kt:=0;
for j:=2 to trunc(sqrt(a[i])) do
if a[i] mod j=0 then kt:=1;
if kt=0 then write(a[i]:4);
end;
readln;
end.
Bài 2:
#include<iostream>;
using namespace std;
bool shh(int a){
int u, tong = 0;
bool kq = false;
for (u = 1; u < a; u++) {
if (a % u == 0) {
tong+= u;
}
}
if (tong == u) {
kq = true;
}
return kq;
}
int main() {
int n, i, u, tong = 0, a[1000];
cout << "Nhap so phan tu: ";
cin >> n;
for (i = 1; i <= n; i++) {
cout << "Phan tu thu " << i << ": ";
cin >> a[i];
}
cout << "Cac So hoan hao:" << endl;
for (i = 1; i <= n; i++) {
if (shh(a[i]) == true) {
cout << a[i] << " ";
}
}
return 0;
}
#include<iostream>;
using namespace std;
int main() {
int i,a,b;
cout << "Nhap A,B: " << endl;
cin >> a >> b;
for (i = a; i <= b; i++) {
if ((i % 10) == (i /10)) {
cout << i << " ";
}
else if (i == 101){
cout << i;
}
}
return 0;
}