Bài 7: Các thủ tục chuẩn vào ra đơn giản

Xuân Huy

Viết chương trình của biểu thức sau, cho x, y là số thực

z = \(\left|1-x^2\right|+\left|1-y^2\right|\)

z = \(\left|1-e^x\right|+\left|1-e^y\right|\)

Nguyễn Lê Phước Thịnh
7 tháng 10 2020 lúc 22:57

uses crt;

var x,y,z:real;

begin

clrscr;

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

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

z:=abs(1-sqr(x))+abs(1-sqr(y));

writeln('Z=',z:4:2);

readln;

end.

Bình luận (0)
 Khách vãng lai đã xóa
Tú Nguyễn
9 tháng 10 2020 lúc 18:52

mik làm cả 2 bằng 1 ct nha

var x,y,z1,z2:real;

begin

write(' Nhap x: ');readln(x);

write(' Nhap y: ');readln(y);

z1:=abs(1-sqr(x)) + abs(1-sqr(y));

z2:=abs(1-exp(x)) + abs(1-exp(y));

writeln(' KQ b1 :' ,z1:0:1);

writeln('KQ b2: ',z2:0:1);

readln;

end.

Bình luận (0)
 Khách vãng lai đã xóa

Các câu hỏi tương tự
Trang Nguyễn
Xem chi tiết
cao thi trang
Xem chi tiết
quan nguyen
Xem chi tiết
0o0 Nhok kawaii 0o0
Xem chi tiết
Huynhnhu
Xem chi tiết
Hoàng Thị Thu Hà
Xem chi tiết
abcde
Xem chi tiết
nguyễn nhất nam
Xem chi tiết
ᄃᄀHjs
Xem chi tiết