Chủ đề này có 1 trả lời

[TuDinh]

Viết phương trình tính tổng S = 2 + 4 + 6 + 8 +...+ 2N, với N >= 1, N được nhập từ bàn phím và có kiểm tra N hợp lệ. 

[Zjkar]

* Phân tích đề:

 

Viết phương trình tính tổng S = 2 + 4 + 6 + 8 +...+ 2N

----> viết chương trình chứ bạn.

Code:

program tt;

uses crt;

var j,k,i,n:integer;

s:real;

begin

clrscr;

repeat

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

if n>=1 then break;

writeln('Hay nhap n>=1');

until false;

s:=0;

for i:=1 to n do

s:=s+2*i;

writeln('Tong: ',s:4:2);

readln

end.

------- Ok rồi đó bạn -----------

Bài viết đã được chỉnh sửa nội dung bởi Zjkar: 05-03-2016 - 19:58