Question

Câu 1:viết chương trình in ra màn hình của phép tính

2*(1/5+2^3)

Câu 2:(sử dụng câu lệnh cặp for... do). Viết chương trình tính tổng của n số tự nhiên liên tiếp.

Câu 3:(sử dụng câu lệnh cặp while... do). Viết chương trình tính tổng nhỏ hơn 1000(bài tập nâng cao)

Giúp em làm với ạ, em đang cần gấp, ai làm được em cảm ơn nhiều nhiều nhé

Answer 1

Câu 1:

uses crt;

begin

clrscr;

writeln(2*(1/5+2*2*2));

readln;

end.

Câu 2: n số tự nhiên liên tiếp bắt đầu từ mấy vậy bạn?

Câu 3:

uses crt;

var i,s:longint;

begin

clrscr;

s:=0; i:=1;

while i<=1000 do

begin

s:=s+i;

inc(i);

end;

writeln(s);

readln;

end.