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.

22 tháng 12 2021

???

22 tháng 12 2021

Lỗi

4 tháng 4 2021

#include<bits/stdc++.h>
using namespace std;
int a[1000000],n,b[1000000];
int main(){
    cin >>n;
    for (int i=1;i<=n;i++) {cin >> a[i];
    if (a[i]%2==1) b[a[i]]=i;
    }    
    for (int i=1;i<=n;i++){
        if (b[a[i]]!=0) {cout << b[a[i]] << " "<<a[i]<<'\n';b[a[i]]=0;}
    }
    
}

Nhập trực tiếp , in dạng :
Chỉ số _ số 

......

4 tháng 4 2021

Mình đang học pascal ạ

14 tháng 3 2021

undefinedundefinedundefinedundefined

24 tháng 3 2021

ghi hết đề ra đi bạn ơi!

uses crt;

var a,b,c,tb:array[1..100]of real;

i,n:integer;

begin

clrscr;

n:=5;

for i:=1 to n do 

  begin

   readln(a[i],b[i],c[i]);

end;

for i:=1 to n do 

  tb[i]:=(a[i]+b[i]+c[i])/3;

for i:=1 to n do 

  writeln('Diem trung binh cua ban thu ',i,' la: ',tb[i]:4:2);

readln;

end.

13 tháng 3 2021

Program HOC24;

var i,n: integer;

a: array[1..32000] of integer;

d: integer;

begin

write('Nhap n: '); readln(n);

d:=0;

for i:=1 to n do

begin

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

if a[i] mod 3=0 then d:=d+1;

end;

write('Co ',d,' phan tu la boi cua 3');

readln

end.

uses crt;

var i,n,dem:integer;

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

begin

clrscr;

write('Nhap n: '); readln(n);

for i:=1 to n do

begin

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

end;

dem:=0;

for i:=1 to n do

  if a[i] mod 3=0 then inc(dem);

writeln(dem);

readln;

end.

Bài 1:

uses crt;

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

i,n,dem:integer;

begin

clrscr;

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

for i:=1 to n do

begin

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

end;

dem:=0;

for i:=1 to n do

if a[i] mod 3<>0 then inc(dem);

writeln('So phan tu khong chia het cho 3 trong day la: ',dem);

readln;

end.

Bài 2:

uses crt;

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

i,n,t:integer;

begin

clrscr;

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

for i:=1 to n do

begin

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

end;

t:=0;

for i:=1 to n do

if a[i]>=0 then t:=t+a[i];

writeln('Tong cac phan tu khong am trong day la: ',t);

readln;

end.

14 tháng 3 2021

15 tháng 3 2021

Mình nhớ có clsrcr với write nữa mà đúng không bạn 

20 tháng 4 2021

Program HOC24;

var s: string;

i,d: byte;

begin

write('Nhap xau :'); readln(s);

d:=0;

for i:=1 to length(s) do if s[i]=' ' then d:=d+1;

write('Xau ',s,' co ',d,' ki tu cach');

readln

end.

uses crt;

var s:string;

i,d,dem:integer;

begin

clrscr;

write('Nhap xau:); readln(s);

d:=length(s);

dem:=0;

for i:=1 to d do 

  if s[i]=#32 then inc(dem);

writeln(dem);

readln;

end.

21 tháng 4 2021

-  Tham số hình thức: Là tham số được đưa vào khi định nghĩa chương trình con.

- Tham số thực sự: Là tham số được viết trong lời gọi chương trình con.

- Biến toàn cục : là biến được khai báo trong chương trình chính. 

- Biến cục bộ: Là các biến được khai báo trong chương trình con.

- Tham số biến: là tham số hình thức được thay bằng tham số thực sự tương ứng là tên các biến và được khai báo sau từ khóa var.

 -  Tham số giá trị: là tham số hình thức được thay bằng tham số thực sự tương ứng là các giá trị cụ thể và không được khai báo sau từ khóa var.

-  Tham số hình thức: Là tham số được đưa vào khi định nghĩa chương trình con.

- Tham số thực sự: Là tham số được viết trong lời gọi chương trình con.

- Biến toàn cục : là biến được khai báo trong chương trình chính. 

- Biến cục bộ: Là các biến được khai báo trong chương trình con.

- Tham số biến: là tham số hình thức được thay bằng tham số thực sự tương ứng là tên các biến và được khai báo sau từ khóa var.

 -  Tham số giá trị: là tham số hình thức được thay bằng tham số thực sự tương ứng là các giá trị cụ thể và không được khai báo sau từ khóa var.