uses crt;

var a:array[1..100]of integer;

n,i,t1,t2:integer;

begin

clrscr;

readln(n);

for i:=1 to n do readln(a[i]);

for i:=1 to n do write(a[i]:4);

writeln;

for i:=1 to n do 

  if a[i] mod 2=0 then write(a[i]:4);

writeln;

for i:=1 to n do

  if a[i] mod 2<>0 then write(a[i]:4);

writeln;

t1:=0;

t2:=0;

for i:=1 to n do 

  begin

if a[i] mod 2=0 then t1:=t1+a[i]

else t2:=t2+a[i];

end;

writeln(t1);

writeln(t2);

readln;

end.

nhầm môn r

Tham khảo:

Bài 1: https://hoc247.net/hoi-dap/tin-hoc-8/viet-chuong-trinh-tinh-tong-s-1-2-3-n-voi-n-la-so-nguyen-nhap-tu-ban-phim-faq156962.html

Bài 2: https://hoc247.net/hoi-dap/tin-hoc-8/viet-chuong-trinh-tinh-tong-s-1-3-5-n-voi-n-duoc-nhap-faq259591.html

1:

#include <bits/stdc++.h>

using namespace std;

long long a,b;

int main()

{

cin>>a>>b;

cout<<a+b;

return 0;

}

2:

#include <bits/stdc++.h>

using namespace std;

double s,r;

int main()

{

cin>>r;

s=r*r*pi;

cout<<fixed<<setprecision(2)<<s;

return 0;

}

Mình không chơi bạn nhé!

Lần sau nhớ đăng đúng mục đích nhé

Học tốt

#include <bits/stdc++.h>
using namespace std;
long long a,b,bcnn;
int main()
{
    cin>>a>>b;
    if (a>b) swap(a,b);
    bcnn=b;
    while (bcnn%a!=0)
        bcnn=bcnn+b;
    cout<<bcnn;
    return 0;
}

Câu 7: A

Câu 8: B

Chọn A

C

C

#include <bits/stdc++.h>

using namespace std;

double x,tb;

int n,i;

int main()

{

cin>>n;

tb=0;

for (i=1; i<=n; i++)

{

cin>>x;

tb+=x;

}

cout<<fixed<<setprecision(2)<<tb/n;

return 0;

}