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.
uses crt;
var a,b:string;
i,d:integer;
begin
clrscr;
write('Nhap xau a:'); readln(a);
d:=length(a);
b:='';
for i:=1 to d do
if a[i] in ['A'..'Z'] then b:=b+a[i];
writeln(b);
readln;
end.
#include <bits/stdc++.h>
using namespace std;
double b[100];
int i,n;
int main()
{
cin>>n;
for (i=1; i<=n; i++) cin>>b[i];
for (i=1; i<=n; i++) if (b[i]>0) cout<<b[i]<<" ";
return 0;
}
Program HOC24;
var n,i: integer;
begin
write('Nhap so nguyen: '); readln(n);
for i:=1 to 10 do
writeln(n,' x ',i,' = ',n*i);
readln
end.
uses crt;
var n,i:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to 10 do
writeln(n,'*',i,'=',n*i);
readln;
end.
uses crt;
const fi='baitap.inp';
var f1:text;
a,b,i,t:integer;
begin
clrscr;
assign(f1,fi); reset(f1);
readln(f1,a,b);
t:=0;
for i:=a to b do
if i mod 2=0 then t:=t+i;
writeln(t);
close(f1);
readln;
end.
#include <bits/stdc++.h>
using namespace std;
long long b[20],i,n;
int main()
{
cin>>n;
for (i=1; i<=n; i++) cin>>b[i];
for (i=1; i<=n; i++)
{
if ((b[i]%2!=0) or (i%2==0)) cout<<b[i]<<" ";
}
return 0;
}
#include <bits/stdc++.h>
using namespace std;
double a,b;
int main()
{
cin>>a>>b;
cout<<fixed<<setprecision(2)<<pow((2*a+5*b),2);
return 0;
}
Quoc Tran Anh Le
Nguyễn Minh Lệ
Băng Băng 2k6
ĐỖ CHÍ DŨNG
Hazz, khá tức giận với bạn này, lôi kéo cả mình vào nữa !
Mình nói cho bạn biết, bạn có liêm sỉ không ? Liêm sỉ bạn cất ở đâu vậy ? Câu trả lời thì toàn đi copy, đã thế toàn đòi GV tick đúng để lên GP, trong khi đó mình trả lời sai, thiếu vân vân đủ thứ ,... Bạn nghĩ mỗi bạn là người làm được bài này ư ? Sai rồi bạn, nên bỏ ngay cái tính trẻ con đấy đi nhé ! Lấy lại liêm sỉ của mình đi, ok :))
Lời nói k mất tiền mua
Lựa lời mà nói không "đóe" vừa lòng nhau đâu !
ĐỖ CHÍ DŨNG: Bạn nên xem lại thái độ nhé. Bản thân tôi là người có kinh nghiệm về tin học full từ 6-12 .Nên bạn không cần đòi công bằng với tôi. Tôi đã xem xét kĩ bài rồi đúng sẽ tic. Cảm ơn bạn.