Viết biểu thức toán học sau bằng ngôn ngữ lập trình pascal: x-1/a+1=2/xmũ2-1
K
Khách
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
Những câu hỏi liên quan
28 tháng 12 2020
b)
uses crt;
var i,y:integer;
begin
clrscr;
y:=0;
for i:=1 to 100 do
y:=y+i;
writeln('y=',y);
readln;
end.
c)
uses crt;
var y,i:integer;
begin
clrscr;
y:=0;
i:=1;
while y<=3200 do
begin
y:=y+i;
inc(i);
end;
writeln('y=',y);
readln;
end.
25 tháng 12 2023
câu 1:
program AlgorithmExample;
var
T, n: integer;
begin
// Bước 1
T := 8;
n := 1;
// Bước 2
while T < 99 do
begin
// Bước 3
n := n + 3;
T := T * n;
end;
// Bước 4
writeln('Gia tri cua T: ', T);
writeln('Gia tri cua n: ', n);
readln;
end.
câu 2:
program StudentAverage;
var
n, countAboveAverage: integer;
sum, average, score: real;
begin
// Nhập số lượng học sinh
write('Nhap so luong hoc sinh (1-70): ');
readln(n);
// Kiểm tra điều kiện
if (n < 1) or (n > 70) then
begin
writeln('So luong hoc sinh khong hop le.');
readln;
halt;
end;
// Khởi tạo biến
countAboveAverage := 0;
sum := 0;
// Nhập và tính điểm trung bình
for var i := 1 to n do
begin
write('Nhap diem cua hoc sinh ', i, ': ');
readln(score);
sum := sum + score;
// Kiểm tra điều kiện điểm trung bình
if score >= 5.0 then
countAboveAverage := countAboveAverage + 1;
end;
// Tính điểm trung bình
average := sum / n;
// In ra kết quả
writeln('So luong hoc sinh dat diem trung binh tro len: ', countAboveAverage);
writeln('Ti le hoc sinh dat diem trung binh tro len: ', countAboveAverage / n * 100:0:2, '%');
readln;
end.
Lưu ý rằng trong chương trình của câu 2, điểm trung bình được tính và sau đó kiểm tra xem học sinh có đạt điểm
trung bình trở lên hay không.
16 tháng 11 2021
a. 5*x*x-6*x+1
b. (2*x*y+1)*(2*x*y-1)
c. (x-1)/(x+1)
d. a/(a+1)+((a-1)*(a-1))/(a+2)
27 tháng 10 2017
Trong ngôn ngữ lập trình (NNLT) Pascal chỉ sử dụng dấu ngoặc đơn () để viết các biểu thức số học. Các phép toán +, -, x, : trong toán học sẽ được chuyển dổi thành +, -, *, / trong NNLT Pascal.
Đáp án: C
8 tháng 9 2018
Trong ngôn ngữ lập trình (NNLT) Pascal:
+ chỉ sử dụng dấu ngoặc đơn () để viết các biểu thức số học.
+ Các phép toán +, -, x, :, trong toán học sẽ được chuyển đổi thành +, -, *, /, trong NNLT Pascal.
+Các phép so sánh ≥, ≤, ≠, >, < , trong toán học sẽ được chuyển đổi thành >=, <=, <>, >, <, trong NNLT Pascal.
Đáp án: D
KV
14 tháng 3 2023
Var a,b,s,p:real;
Begin
Write('a = ');readln(a);
Write('b = ');readln(b);
p:=(a + b)*2;
s:=a*b;
Write('P = ',p:10:2,' va s = ',s:10:2);
Readln;
End.
25 tháng 12 2023
program CompareNumbers;
var
x, y: real;
begin
// Bước 1: Nhập 2 số thực x và y từ bàn phím
write('Nhap so thuc x: ');
readln(x);
write('Nhap so thuc y: ');
readln(y);
// Bước 2: So sánh x và y, in ra số lớn hơn
if x > y then
writeln('x lon hon y')
else if x < y then
writeln('y lon hon x')
else
writeln('x bang y');
readln;
end.
(khoog bt đúng ko)
(x-1)/(a+1)=2/(x*x-1)