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.

6 tháng 5 2023

chắc là sửa lỗi nhỉ

dòng 11: thiếu ''[i]''

=> Readln(A[i]);

dòng 16: sai ở dấu ''<>'', dư cặp dấu ngoặc đơn và thiếu ''[i]''

=> If A[i] mod 2=0 then Tong:=Tong+A[i];

Dư cụm Begin .... End; ở dòng 15 và 17

 

 

 

mình nghĩ còn sai ở khai báo ''tong''(sửa thành ''Tong'') và lệnh clrscr; ở dòng 9(vì mình thấy thường nó ở đầu phân thân). Mình chỉ nghĩ thôi ko rõ(mình nghĩ thế do lúc học toàn ghi thế à), mà bài tập này là bạn phải viết trên máy mà

#include <bits/stdc++.h>

using namespace std;

long long n,i,x,dem;

int main()

{

cin>>n;

dem=0;

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

{

cin>>x;

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

}

cout<<dem;

return 0;

}

 

13 tháng 3 2023

Uses crt;

var i,n,y: integer;

begin clrscr;

readln(n);

for i:=1 to n do s:=i*i;

Writeln(s);

readln;

end.

13 tháng 3 2023

Program HOC24;

var i,n: integer;

s: longint;

begin

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

s:=0;

for i:=1 to n do s:=s+sqr(i);

write('S= ' ,s);

readln

end.

2 tháng 4 2021

Bạn có thể nêu rõ là phần thân của chương trình nào được không(vd: số nguyên tố, số song tố, ...) 

uses crt;

var i,n:integer;

s:real;

begin

clrscr;

readln(n);

s:=0;

for i:=1 to n do 

 s:=s+(i/(i*sqr(i+5)));

writeln(s:4:2);

readln;

end.

9 tháng 11 2021

thi ban co nho lai mat khau la j , ban nho xem ban co doi mat khau ko

9 tháng 11 2021

mik gõ r mà mik chắc chắc 100% mật khẩu đó đúng . À mà mik lấy nick em mik vào trang của mik thì nó để là Nick đã bị đổi chủ! !