Cần Giúp Khẩn Cấp ! help me :(

[**Asakura Hao**]

tình hình là Hao ko biết phải post cái bài này ở đâu mà đang cần rất gấp nên post vào đây
chắc là sai chỗ nhưng mong mod lượng thứ cho sống 1 ngày và chém nhẹ tay 1 chút là tốt rồi ::(
ai giỏi về pascal thì làm dùm Hao mấy bài này với . cảm ơn nhìu ::)
1/ viết câu lệnh rẽ nhánh tính
a/ z= x²+y² nếu x²+y² <= 1
z= x+y nếu x²+y²>1 và y>=x
z= 0.5 nếu x²+y²>1 và y<x

b/ z=|x|+|y| nếu điểm (x,y) thuộc hình tròn bán kính r (r>0),tâm (a,b)
z= x+y trong trường hợp còn lại

mấy cái bài " nhập môn pascal " này chắc các pro giải quyết nhanh gọn lẹ
ai giúp dùm Hao với nhé , mọi người đừng chat nhảm kẻo topic bị lock ::(
thx đã đọc

 

[booor]

Hao học pascal à , sao lại ko có chỗ post , qua box phần mềm ấy , nhờ Mod move hộ đi

 

[meotheki]

1a :
if (x*x+y*y<1) or ( x*x+y*y=1) then z:= x*x+y*y esle
if y< x then z:= 0.5 esle z:= y+x ;
1b : mình cũng có thể giải giúp bạn nếu bạn chỉ mình cách tính khoảng cách giữa 2 điểm co tọa đô (x,y) và (a,b)
Lâu kô xài pascal nên chả nhớ x bình ghi sao nữa
À , mà gamevn hình như có box chuyên về lập trình hay sao ý , bạn vác qua đó nhờ giải cho chắc

 

[**Asakura Hao**]

Hao học pascal à , sao lại ko có chỗ post , qua box phần mềm ấy , nhờ Mod move hộ đi

box phần mềm đâu có giải mấy cái này ::(

À , mà gamevn hình như có box chuyên về lập trình hay sao ý , bạn vác qua đó nhờ giải cho chắc

if (x*x+y*y<1) or ( x*x+y*y=1) then z:= x*x+y*y esle
[color=red]if[/color](cái này phải là and chứ nhỉ) y< x then z:= 0.5 esle z:= y+x ;

hix nó nằm ở đâu vậy
ko biết làm chán quá ::( ông thầy ổng bắt kiểm tra = giấy
mà làm = giấy sao kiểm tra được đúng hay sai

 

[Chamoisking]

Đang thi Tin học hả ?

1/
a/
if (x*x+y*y <= 1)
then z:= x*x+y*y
else if (y>=x)
then z:=x+y
else z:=0.5;

b/ if (sqrt((x-a)^2 + (y-b)^2) <= r)
then z:=abs(x)+abs(y)
else z:=x+y;

 

[booor]

đây <-- kế bên box phần mềm

 

[meotheki]

thôi , cứ ghi cách tính khoảng cách giữa 2 điểm ra đây roài meo làm luôn ^_^
toán 12 quên sạch roài

 

[**Asakura Hao**]

Đang thi Tin học hả ?

1/
a/
if (x*x+y*y <= 1)
then z:= x*x+y*y
else if (y>=x)
then z:=x+y
else z:=0.5;

b/ if (sqrt((x-a)^2 + (y-b)^2) <= r)
then z:=abs(x)+abs(y)
else z:=x+y;

cảm ơn nhìu nhé ^^
mọi người giúp hao mấy bài này nữa nhé

2/ lập trình để giải

vừa gà vừa chó
bó lại cho tròn
36 con
100 chân trẵn
hỏi có bao nhiêu con mỗi loại ?

3/

nhập từ bàn phím tuổi của cha và con ( hiện tại tuổi cha hơn tuổi con 2 lần , và tuổi cha hơn tuổi con ít nhất là 25 ). Đưa ra màn hình câu trả lời cho câu hỏi " bao nhiêu năm nữa thì tuổi cha gấp đôi tuổi con ?

4/

1 người gửi tiết kiệm không kì hạn với số tiền A đồng với lãi suất 0,3% mỗi tháng. Hỏi sau bao nhiêu tháng, người đó rút hết tiền thì sẽ nhận được số tiền ít nhất là B đồng ? biết rằng với việc gửi tiết kiệm không kì hạn thì lãi không được cọng vào vốn.

mọi người làm ơn giúp . Hao cần gấp lắm
cảm ơn tất cả :hug:

 

[Chamoisking]

Cái này gọi là được voi đòi tiên. Tiếc là mình đang bận. Nếu lập trình bằng Assembly thì may ra còn có hứng.

 

[meotheki]

bài 2
x:= 100-(36*2); { tóm lại x = 28 }
y:= x/2 ; {y = 14}
z:= 36-x ; { z = 22 }
y : số chó
z: số gà
Bài 4
c:=a;
1 : If C>b then write (' gửi tiền làm ***** gì nữa , cầm về ' ) esle
begin
C:= c+a*0.3 ;
goto 1;
end;

 

[gigabyte]

cứ post vào đố vui ấy

 

[minh8a(^_^)]

a/ z= x²+y² nếu x²+y² <= 1
z= x+y nếu x²+y²>1 và y>=x
z= 0.5 nếu x²+y²>1 và y<x

b/ z=|x|+|y| nếu điểm (x,y) thuộc hình tròn bán kính r (r>0),tâm (a,b)
z= x+y trong trường hợp còn lại

mấy cái này trong sách Tin 11 đây mà, hôm bữa bà cô giải mà ko chép

 

[sevenup]

Bảo đảm 100% Hao đang học lớp 11, tại có trong sách tin lớp 11(hehe, mình cũng dzậy nè), một số bài thì hiện đang pó tay, mình xin giải 1 ít thôi nhé.

nhập từ bàn phím tuổi của cha và con ( hiện tại tuổi cha hơn tuổi con 2 lần , và tuổi cha hơn tuổi con ít nhất là 25 ). Đưa ra màn hình câu trả lời cho câu hỏi " bao nhiêu năm nữa thì tuổi cha gấp đôi tuổi con ?

Chơi luôn bài giải nè :

var tcha, tcon, i: byte;
begin
writeln('Hay nhap tuoi cha');
readln(tcha);
writeln('Hay nhap tuoi con');
readln('tcon);
i:=0;
if (tcha<2*tcon) and (tcha<25) then writeln('khong phu hop voi du kien')
esle
begin
while not (tcha=2*tcon) do
begin
i:=i+1;
tcha:=tcha+1;
tcon:=tcon+1;
end;
end;
writeln(‘So nam de tuoi cha bang 2 lan tuoi con la: “, i);
readln
end.

Có gì sai bạn nói mình nha, tại vì lười kiểm tra quá, viết lên pascal không copy được nên phải viết lại ra word. Để thử làm mấy bài kia coi

 

[Dracuba]

bạn này học trước chương trình hay sao thế, tui vẫn còn mấy bài nữa mới đến mà

 

[Lien]

Đang pascal, giờ mình lái sang C vậy.
Mình đang học C, nhưng lại chỉ có sách C++, nên nếu chỗ nào không phải là C thì các bạn chuyển sang cấu trúc của C dùm luôn.
Mình chạy bài này, nhưng không hiểu sao nó cứ báo lỗi là không thể chuyển từ INT* sang INT gì gì đó, ngay cái đoạn bôi đậm ý, không hiểu tại sao? (hỏi ông thầy ông cũng không biết, híc)
Các bạn cóp vào notepad, rồi chuyển sang đuôi *.Cpp mà chạy xem, và sửa giúp mình tại sao?
Đây là bài tìm vị trí của một số do mình đưa vào trong một mảng có thứ tự tăng dần, theo phương pháp chia đôi mảng mà tìm.
Thank

#include <stdio.h>
#include <conio.h>
#include <math.h>
void main ()
{
int timnhiphan(int,int,int);
printf("nhap s");
int s,i,x,vt,a[100];
scanf("%d",&s);
for (i=0;i<s;i++)
{
printf("Nhap mot mang mang tang\n");
printf("a[%d]= ",i);
scanf("%d",a);
}
printf("nhap so can tim");
scanf("%d",&x);
vt=timnhiphan(a,x,s);
if (vt==-1)
printf("khong tim thay");
else
printf("so %d o vi tri %d",x,vt);
getch ();
}

int timnhiphan(int a[], int x, int n)
{
int left , right , mid;
left = 0;
right = n-1;
while (left <= right)
{ mid = (left + right) / 2;
if (a[mid] < x)
left = mid +1;
else
{ if (a[mid] > x)
right = mid - 1;
else
return mid;
}
}
return -1;
}

 

[**Asakura Hao**]

Bảo đảm 100% Hao đang học lớp 11

thì có ai nói gì đâu , đang học 11
hix , còn 1 bài nữa ai giúp nốt với
thx

 

[hiendat89]

11 học zì lạ thế...hồi đó mình học làm zì có mấy thứ này @_@

 

[jumper]

Đang pascal, giờ mình lái sang C vậy.
Mình đang học C, nhưng lại chỉ có sách C++, nên nếu chỗ nào không phải là C thì các bạn chuyển sang cấu trúc của C dùm luôn.
Mình chạy bài này, nhưng không hiểu sao nó cứ báo lỗi là không thể chuyển từ INT* sang INT gì gì đó, ngay cái đoạn bôi đậm ý, không hiểu tại sao? (hỏi ông thầy ông cũng không biết, híc)
Các bạn cóp vào notepad, rồi chuyển sang đuôi *.Cpp mà chạy xem, và sửa giúp mình tại sao?
Đây là bài tìm vị trí của một số do mình đưa vào trong một mảng có thứ tự tăng dần, theo phương pháp chia đôi mảng mà tìm.
Thank

#include <stdio.h>
#include <conio.h>
#include <math.h>
void main ()
{
int timnhiphan(int,int,int);=> khai báo nguyên mẫu hàm kiểu này sai là phải, nên đưa ra khỏi hàm main, sửa lại là
int timnhiphan(int a[],int,int);

printf("nhap s");
int s,i,x,vt,a[100];
scanf("%d",&s);
for (i=0;i<s;i++)
{
printf("Nhap mot mang mang tang\n");
printf("a[%d]= ",i);
scanf("%d",a); =>> thiếu địa chỉ
}
printf("nhap so can tim");
scanf("%d",&x);
vt=timnhiphan(a,x,s);
if (vt==-1)
printf("khong tim thay");
else
printf("so %d o vi tri %d",x,vt);
getch ();
}

int timnhiphan(int a[], int x, int n)
{
int left , right , mid;
left = 0;
right = n-1;
while (left <= right)
{ mid = (left + right) / 2;
if (a[mid] < x)
left = mid +1;
else
{ if (a[mid] > x)
right = mid - 1;
else
return mid;
}
}
return -1;
}

 

[_TranHoangDuong_]

11 học zì lạ thế...hồi đó mình học làm zì có mấy thứ này @_@

bài tập số 6 trong sdachs giáo hoc tin học lớp 11

 

[jumper]

mà thường trong C kô làm mảng với số phần tử định trước như vậy đâu
nên khai báo : int *a;
rồi khi có số phần tử mới cấp phát vùng nhớ
a = new [kích thước];