Câu1: Viết Phương Trình Tính Tổng Các Số Chẵn /lẻ Từ 1 đến 100 Câu2

Tìm×

Tìm kiếm với hình ảnh

Vui lòng chỉ chọn một câu hỏi

Tìm đáp án

• • Đăng nhập
  • |
  • Đăng ký
  

Hoidap247.com Nhanh chóng, chính xác

Hãy đăng nhập hoặc tạo tài khoản miễn phí!

Đăng nhậpĐăng ký

Đặt câu hỏi

+

Lưu vào

• +

  Danh mục mới

Lưu

• nguyenducduy5014
• Chưa có nhóm

• Trả lời

  0

• Điểm

  15

• Cảm ơn

  0

• Tin Học
• Lớp 8
• 10 điểm
• nguyenducduy5014 - 21:38:42 09/02/2020

Câu1: Viết phương trình tính tổng các số chẵn /lẻ từ 1 đến 100 Câu2: viết phương trình đếm có bao nhieu số chẵn / lẻ từ 1 đến 100 Sử dụng câu lệnh if và vòng lập for...to...do Làm pascal

• Hỏi chi tiết
• Báo vi phạm

Hãy luôn nhớ cảm ơn và vote 5* nếu câu trả lời hữu ích nhé!

TRẢ LỜI

• canhtoanle
• Chưa có nhóm

• Trả lời

  1254

• Điểm

  14273

• Cảm ơn

  1155

• canhtoanle

• 09/02/2020

Đây là câu trả lời đã được xác thực

Câu trả lời được xác thực chứa thông tin chính xác và đáng tin cậy, được xác nhận hoặc trả lời bởi các chuyên gia, giáo viên hàng đầu của chúng tôi.

Câu 1:

Tổng số chẵn.

var kq,i: integer;

begin

for i:=1 to 100 do

if i mod 2 = 0 then inc(kq,i);

write('Tong so chan 1 den 100 la: ',kq);

end.

Tổng số lẻ

var kq,i: integer;

begin

for i:=1 to 100 do

if not i mod 2 = 0 then inc(kq,i);

write('Tong so le 1 den 100 la: ',kq);

end.

Câu 2:

Đếm số chẵn

var dem,i:integer;

begin

for i:=1 to 100 do

if i mod 2 = 0 then inc(dem);

write('Tong so chan: ',dem);

end.

Đếm số lẻ

var dem,i:integer;

begin

for i:=1 to 100 do

if not i mod 2 = 0 then inc(dem);

write('Tong so le: ',dem);

end.

Hãy giúp mọi người biết câu trả lời này thế nào?

starstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarGửiHủy

• Cảm ơn

• 
  • nguyenducduy5014
  • Chưa có nhóm
  • Trả lời

    0

  • Điểm

    15

  • Cảm ơn

    0

  Bạn ơi mình chỉ mới học tới bài for... do còn if Not i mò 2=0 then inc(...) thì mình ko hiểu bạn có thể lập cái nào dễ hơn ko

• 
  • canhtoanle
  • Chưa có nhóm
  • Trả lời

    1254

  • Điểm

    14273

  • Cảm ơn

    1155

  inc(kq,i) giống như là kq:=kq+1

• 
  • canhtoanle
  • Chưa có nhóm
  • Trả lời

    1254

  • Điểm

    14273

  • Cảm ơn

    1155

  if not (nếu không) còn if là (nếu)

• 
  • nguyenthanh9828
  • Chưa có nhóm
  • Trả lời

    0

  • Điểm

    42

  • Cảm ơn

    0

  Cho mình hỏi inc(kq,i) con cách viết nào khác không ạ

Đăng nhập để hỏi chi tiết

• trangnguyen1997
• Chưa có nhóm

• Trả lời

  3

• Điểm

  74

• Cảm ơn

  0

• trangnguyen1997

• 10/02/2020

Câu 1:

Tổng số chẵn.

var kq,i: integer;

begin

for i:=1 to 100 do

if i mod 2 = 0 then inc(kq,i);

write('Tong so chan 1 den 100 la: ',kq);

end.

Tổng số lẻ

var kq,i: integer;

begin

for i:=1 to 100 do

if not i mod 2 = 0 then inc(kq,i);

write('Tong so le 1 den 100 la: ',kq);

end.

Câu 2:

Đếm số chẵn

var dem,i:integer;

begin

for i:=1 to 100 do

if i mod 2 = 0 then inc(dem);

write('Tong so chan: ',dem);

end.

Đếm số lẻ

var dem,i:integer;

begin

for i:=1 to 100 do

if not i mod 2 = 0 then inc(dem);

write('Tong so le: ',dem);

end.

Hãy giúp mọi người biết câu trả lời này thế nào?

starstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarGửiHủy

• Cảm ơn
• Báo vi phạm

Đăng nhập để hỏi chi tiếtXEM LỜI GIẢI SGK, SBT LỚP 8 - TẠI ĐÂY

Bạn muốn hỏi điều gì?

Đặt câu hỏi

Tham Gia Group Dành Cho 2K11 Chia Sẻ, Trao Đổi Tài Liệu Miễn Phí

Bảng tin

Bạn muốn hỏi điều gì?

Đặt câu hỏi

Lý do báo cáo vi phạm?

Gửi yêu cầu Hủy

Cơ quan chủ quản: Công ty Cổ phần Công nghệ Giáo dục Thành Phát

• 
• 
• 

Tải ứng dụng

• Hướng dẫn sử dụng
• Điều khoản sử dụng
• Nội quy hoidap247
• Góp ý
• Tin tức

• Inbox: m.me/hoidap247online
• Trụ sở: Tầng 7, Tòa Intracom, số 82 Dịch Vọng Hậu, Cầu Giấy, Hà Nội.

Giấy phép thiết lập mạng xã hội trên mạng số 331/GP-BTTTT do Bộ Thông tin và Truyền thông.