K
Khách

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.

4 tháng 7 2017

chỉ ctv hoặc giáo viên mới lm đc thôi! còn chọn đúng thì nhấn đúng là ok bn!

17 tháng 11 2017

Program bai1;

uses crt;

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

n,i: integer;

begin

clrscr;

write('nhap n ='); readln(n);

for i:= 1 to n do

begin

write('nhap a[',i,'] ='); readln(a[i]);

end;

writeln('cac so chan la :');

for i:= 1 to n do

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

writeln;

writeln('cac so le la :');

for i:= 1 to n do

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

writeln;

writeln('cac so chia het cho 3 la :');

for i:= 1 to n do

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

readln;

end.

23 tháng 11 2021

      Hãy liệt kê các bộ phận của máy tính mà em biết ?

Đáp án ; USB , thân máy tình , ổ đĩa

      Bây giờ muốn soạn thảo văn bản thì em sẽ sử dụng chương trình nào trong máy tính ?

Đáp án : Đa số việc soạn thảo văn bản khi được thực hiện trên máy tính người dùng sẽ sử dụng ứng dụng word

*      Nếu con người không điều khiển các thiết bị đó thì máy tính có hoạt động được không?

Đáp án : Không

*      Vậy từ các câu hỏi trên các em có biết hệ thống tin học gồm những phần nào, và mỗi bộ phận của máy tính sử dụng chức năng gì?

Thu nahanj de

a: uses crt;

var s,i:integer;

begin

clrscr;

s:=0;

for i:=1 to 70 do s:=s+i;

write(s);

readln;

end.

b: 

uses crt;

var s,i:integer;

begin

clrscr;

s:=1;

for i:=1 to 80 do

if i mod 2=0 then s:=s+i;

write(s);

readln;

end.

18 tháng 3 2023

là sao ạ, mk giải hộ bt cho ngta:))

1:

#include <bits/stdc++.h>

using namespace std;

long long x,n,i,dem;

int main()

{

cin>>n;

dem=0;

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

{

cin>>x;

if (x%5==0) dem++;

}

cout<<dem;

return 0;

}

2: 

#include <bits/stdc++.h>

using namespace std;

long long x,n,i,dem;

int main()

{

cin>>n;

dem=0;

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

{

cin>>x;

if (x%2==0) dem++;

}

cout<<dem;

return 0;

}

a=10 =>b=1010

a=120 =>b=1111000

a=1023 =>b=1111111111

a=35000 =>b=1000100010111000