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.

20 tháng 1 2017

       các số tự nhiên chẵn < 10000 là:

0; 2; 4; 6;...; 9998

    Số số hạng của dãy là:

  ( 9998- 0) : 2 +1 = 5000 ( số hạng)

  Tổng dãy trên là:

  ( 9998 +0) x 5000 : 2 =  24995000

19 tháng 12 2017

Gửi bài tập cần làm >> Bài tập tôi đã gửi lênLời giải tôi đã gửi lênGửi chia sẻ phương pháp học tập
  • Tìm theo Lớp học
  • Lớp 1
  • Lớp 2
  • Lớp 3
  • Lớp 4
  • Lớp 5
  • Lớp 6
  • Lớp 7
  • Lớp 8
  • Lớp 9
  • Lớp 10
  • Lớp 11
  • Lớp 12
  • Đại học
  • Trình độ khác
  • Tìm theo Môn học
  • Âm nhạc
  • Mỹ thuật
  • Toán học
  • Vật lý
  • Hóa học
  • Ngữ văn
  • Tiếng Việt
  • Tiếng Anh
  • Đạo đức
  • Khoa học
  • Lịch sử
  • Địa lý
  • Sinh học
  • Tin học
  • Lập trình
  • Công nghệ
  • Thể dục
  • Giáo dục Công dân
  • Giáo dục Quốc phòng - An ninh
  • Ngoại ngữ khác
  • Xác suất thống kê
  • Tài chính tiền tệ
  • Khác
Lazi.vn - Cộng đồng Tri thức & Giáo dục == Môn học == Âm nhạc Mỹ thuật Toán học Vật lý Hóa học Ngữ văn Tiếng Việt Tiếng Anh Đạo đức Khoa học Lịch sử Địa lý Sinh học Tin học Lập trình Công nghệ Thể dục Giáo dục Công dân Giáo dục Quốc phòng - An ninh Ngoại ngữ khác Xác suất thống kê Tài chính tiền tệ Khác == Trình độ lớp == Đại học Cấp 3 (Trung học phổ thông) - Lớp 12 - Lớp 11 - Lớp 10 Cấp 2 (Trung học cơ sở) - Lớp 9 - Lớp 8 - Lớp 7 - Lớp 6 Cấp 1 (Tiểu học) - Lớp 5 - Lớp 4 - Lớp 3 - Lớp 2 - Lớp 1 Trình độ khác Gửi bài tập bạn cần làm Bài tập | Bài tập chưa có lời giải >> | Bài tập tôi đã gửi lên >> | Phương pháp Học tập >> | Gửi bài tập >> Nội dung bạn tìm " Viết chương trình cho phép tính trung bình cộng của 4 số " có trong những liên kết dưới đây, nhấp chuột để xem chi tiết: Viết chương trình cho phép tính trung bình cộng của 4 số (Tin học - Lớp 8)
Nguyễn Hiếu
Thứ 3, ngày 20/12/2016 03:41:26
Xem chi tiết + Lời giải... Viết chương trình pascal tính: Tính diện tích của tam giác có 3 cạnh là A, B, C (được nhập từ bàn phím); Viết chương trình cho phép tính trung bình cộng của 4 số (số được nhập từ bàn phím); Viết chương trình cho phép tính trung bình nhân của 4 số với điều kiện chỉ được sử dụng 2 biến (được nhập từ bàn phím)(Tin học - Lớp 11)
Huỳnh thắm
Chủ nhật, ngày 09/10/2016 02:11:22
Viết chương trình pascal tính:
a) Tính diện tích của tam giác có 3 cạnh là A, B, C (được nhập từ bàn phím)
b) Viết chương trình cho phép tính trung bình cộng của 4 số (số được nhập từ bàn phím)
c) Viết chương trình cho phép tính trung bình nhân của 4 số với điều kiện chỉ được sử dụng 2 biến (được nhập từ bàn phím) Xem chi tiết + Lời giải...
Giải thưởng tháng 11 Giới thiệu Thành viên Bảng Xếp Hạng Khảo sát ý kiến
Like và Share page Lazi fb.com/lazi.vn để nhận được nhiều thông tin thú vị và bổ ích hơn nữa! Đuổi hình bắt chữ Hình ảnh mã số 1372 - Đây là gì các bạn??? Hình ảnh mã số 1371 Hình ảnh mã số 1370 Hình ảnh mã số 1369 Hình ảnh mã số 1368 Hình ảnh mã số 1367 Hình ảnh mã số 1366 Hình ảnh mã số 1365 Xem tất cả >> | Gửi hình ảnh của bạn >> Loading... Đố vui
  • Tìm chữ số tiếp theo của dãy: 5; 25; 29; 85; 89; ? (chưa có đáp án)
  • Hạt gì không thể mọc thành cây mà còn làm cho cây tươi tốt? (chưa có đáp án)
  • Có ông thợ săn đang đi trên đồi thì phát hiện cá hổ, ông ấy bắn con cá hổ ăn thịt người dù đã bắn trúng nhưng nó vẫn sống? Vì sao lại vô lý thế?
  • Có một bà cụ bả tên là Nguyễn Thị Ở Dơ. Hỏi SĐT của bả là số bao nhiêu?
  • Tên như cái túi, cái bì. Ở trong bọc trứng, da thì trắng phau?
Xem tất cả >> | Gửi đố vui của bạn >> Đố vui IQ Kể tên các con vật có trong bức tranh Một cậu bé đang ngủ, mẹ cậu đi vào bảo: Con thi được mấy điểm. Hỏi cậu bé trả lời mẹ thế nào? Tìm điểm khác nhau giữa 3 con mèo? Ai đúng - Ai sai? Có bao nhiêu hình tam giác? Cốc nào sẽ đầy nước trước? Hãy tìm con mèo khác biệt? Hình nào khác biệt với những hình còn lại? Xem tất cả >> | Gửi đố vui IQ của bạn >> Thăm dò Khảo sát ý kiến
  • Bạn có yêu môn Văn không?
  • Thằng mà mình để ý, con bạn không thân lắm cứ tỏ ra tốt với nó. Làm gì với thằng nhỏ và con bé?
  • Idol của bạn là ai?
  • Điểm thi môn nào thấp nhất?
  • Bạn học lớp mấy?
  • Edogawa Conan (Kudou Shinichi) và Kaito Kid (Kuroba Kaito), bạn thích ai hơn?
  • Bạn thích bài nào trong LOVE LIVE?
  • Bạn thích làm Vật lý, Toán tiếng Việt, Toán tiếng Anh, hay IOE hơn?
  • Bạn thấy môn tiếng Anh cho vào bộ đề thi lên cấp 3 có hợp lí không?
  • Mori Ran và Haibara Ai trong Conan, bạn thích ai hơn?
Xem tất cả >> | Tạo thăm dò khảo sát ý kiến >> Truyện cười | Truyện ngụ ngôn
  • Ai ghê gớm hơn
  • Áo không dám mặc
  • Thay thế
  • Lũ ếch muốn có vua
  • Ong Mật, Ong Vằn và Ong Bắp Cày
  • Trùn và Cá
  • Tất cả truyện cười >>
  • Tất cả truyện ngụ ngôn >>
Gửi truyện cười >> | Gửi truyện ngụ ngôn >>
Giải thưởng tháng 11 Giới thiệu Thành viên Bảng Xếp Hạng Khảo sát ý kiến
Lazi.vn BẢNG XẾP HẠNG TOP THÀNH VIÊN Tuần 17 - 23/12 | Tháng 12-2017 | Yêu thích
STT Họ tên Avatar Điểm
1 Huyền Thu 203
2 Nguyễn Trần Lam Phong 97
3 lê thị thùy diên 65
4 Cao Dũng 59
5 Baby cool ❤ 57
Giải thưởng T.11 Bảng Xếp Hạng
[Đóng lại]
Google Facebook
  • Trang chủ
  • Hỏi đáp
  • Học tập
  • Trung tâm GD&ĐT
  • Giới thiệu Sách hay
  • Trường học
  • Shop Lazi
  • Gia sư
  • Bản tin Giáo dục & Đào tạo
  • Thi trắc nghiệm
  • Tài liệu
  • PP Học tập
  • Khảo sát ý kiến
  • Đố vui
  • Mục tiêu của bạn
  • Kết bạn bốn phương
  • Đố vui IQ
  • Truyện cười
  • Tư duy logic
  • Truyện ngụ ngôn
  • Đuổi hình bắt chữ
  • Video
  • Những điều tốt đẹp
  • Thơ văn danh ngôn
  • Thế giới đó đây - Những điều kỳ thú
  • Chia sẻ tâm sự - Bạn đọc viết
  • Chương trình Sự kiện tại Lazi.vn
  • Thống kê tổng quan
  • Xem lịch
  • Hôm nay
  • Phòng trò chuyện
  • Copyright ©2017 Lazi.vn
Phòng trò chuyện (Hiện / Ẩn) scroll top
19 tháng 12 2017

tích cho mnhf nha

9 tháng 2 2022

Tham khảo:

* Lặp tiến :

uses crt;

var i, n, P : longint;

begin

clrscr;

P := 1;

write('nhap so n : '); readln(n);

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

writeln(n,'! = ', P);

readln

end.

* Lặp lùi :

uses crt;

var i, n, P : longint;

begin

clrscr;

P := 1;

write('nhap so n : '); readln(n);

for i := n downto 1 do P := P * i;

writeln(n,'! = ', P);

readln

end.

uses crt;

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

i,n,min:integer;

begin

clrscr;

readln(n);

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

min:=a[1];

for i:=1 to n do 

  if min>a[i] then min:=a[i];

writeln(min);

readln;

end.

Cái này mình viết chương trình chính thôi, bạn tự viết ctc nhé

Câu 1: 

uses crt;

var n,i,s:longint;

begin

clrscr;

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

s:=1;

for i:=1 to n do

 s:=s*i;

writeln(s);

readln;

end.

Câu 2: 

uses crt;

var st:string;

i,d:integer;

begin

clrscr;

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

d:=length(st);

for i:=d downto 1 do 

  write(st[i]);

readln;

end.