một số bài tin học 11

[hellboy0308]

bài 1: cho ba so nguyen m,n,l tìm bình phương của các số không âm và lập
phương của những số âm.
bài 2:cho ba số nguyên m,n,k. Nếu ba số này theo thứ tự nhập vào tạo thành một
cấp số cộng thì tăng gấp đôi mỗi số, trong trường hợp ngược lại thì giảm mỗi số một đơn vị.Viết chương trình thực hiện yêu cầu trên.
bài 3:cho ba số nguyên p,q,r(khác 0) kiểm tra ba số này theo thứ tự nhập vào
có thể tạo thành một cấp số nhân hay không.viết chương trình thực hiện yêu
cầu trên.

có bạn nào biết thì giúp mình với(sử dụng câu lệnh rẽ nhánh) cám ơn nhiều

[cao_thu]

mấy cái bài cơ bản này chịu khó mà tự làm chứ, chỉ cần thuộc mỗi cai cách viết câu lệnh là xong.
bai1 chi có if a>=0 then a:=sqr(a) else a:=a*sqr(a);
bài 2 dài hơn một tí
if (n-m)=(k-n) then tanggapdoi else giamdimotnua
bài 3 cũng thế

[tranvanho]

úi giời 3 bài dễ òm
bạn chố mà suy nghĩ và làm đi mấy bài đó cũng đơn giản thui mà

[tranvanho]

bài 1 nè
if m<0 then m:=m*m*m;
else m:=m*m;
còn n và l thì tương tự
còn đây là bài 2
if (n-m)=(k-n) then
begin
m:=m*2;n:=n*2;k:=k*2;
end
else
begin
m:=m-1;
n:=n-1;
k:=k-1;
end;
bài 3 tương tự như bài 2 thui

[silkroadpro]

Cấp số + :
Cho 3 số nguyên a,b,c.Nếu a+c=2b thì tạo thành 1 CSC.Đây là bài toán trong sách 11 mà.

[Foolpro]

toàn bài dễ! nhưng các bạn nên thông cảm cho những người mới học pascal <ngày đầu ai chẳng thế>

[tranvanho]

toàn bài dễ! nhưng các bạn nên thông cảm cho những người mới học pascal <ngày đầu ai chẳng thế>

good bác này nói đúng đấy bà con ạ
ai mới học chả vậy

[hellboy0308]

cám ơn các bạn nhiều lắm (chẳng qua là mình chưa học tới cấp số nhân và cấp số cộng)

[doremon_No1]

bạn học lớp mấy rồi mà đã học pascal rồi.
Nếu 11 thì phải biết cấp số cộng, cấp số nhân chứ

[siro391992]

Các bạn có dám sang trả lời câu của mình không