viết chương trình tính giá trị biểu thức trong pascal
90/3-8*2
Viết chương trình tính giá trị biểu thức sau : A= 2x^2 + y
uses crt;
var x,y:integer;
begin
clrscr;
readln(x,y);
writeln(2*x*x+y);
readln;
end.
Bài 1: Viết chương trình nhập vào từ bàn phím các số thực a,b,c,d. Tính và đưa ra màn hình giá trị biểu thức: 2cb3 + 5cd4 – 3a? + bcd" - Bài 2: Viết chương trình nhập vào từ bàn phím 2 số nguyên m,n (n>0). Tính và đưa ra màn hình giá trị biểu thức nm-2 ~kíuuuuu~
Bài 2:
#include <bits/stdc++.h>;
using namespace std;
int main();
{
long m,n;
cout<<"Nhap m="; cin>>m;
cout<<"Nhap n="; cin>>n;
cout<<m*n-2;
return 0;
}
Câu 1 viết chương trình tính giá trị biểu thức với x,y là các số nguyên dc nhập từ bàn phím. In kết quả ra màn hình Caau2 viết chương trình vào 3 số nguyên a,b,c.In ra màn hình số lớn nhất trong 3 số đó
Câu 2:
Program nii;
Uses crt;
Var a,b,c,A:integer;
Begin
Write ('nhap a');
Readln (a);
Write ('nhap b');
Readln (b);
Write ('nhap c');
Readln (c);
A:=a;
If A<b then A:=b;
If A<c then A:=c;
Write ('Ket qua',A);
Readln;
End.
Câu 1
Program ntg;
Uses crt;
Var A,x,y:integer;
Begin
Write ('nhap x');
Readln (x);
Write ('nhap y');
Readln ('y');
A:=x+y;
Write ('Ket qua',A);
Readln;
End.
Câu 2:
uses crt;
var a,b,c,max:integer;
begin
clrscr;
write('Nhap a='); readln(a);
write('Nhap b='); readln(b);
write('Nhap c='); readln(c);
max:=a;
if max<b then max:=b;
if max<c then max:=c;
writeln('So lon nhat trong 3 so la: ',max);
readln;
end.
Viết chương trình Pascal dùng để tính giá trị biểu thức sau:
10+4(15-10)2/6+4
uses crt;
begin
clrscr;
writeln(10+4*sqr(15-10)/6+4);
readln;
end.
viết chương trình tính giá trị biểu thức c= (a + b)/2
làm ơn nhanh lên cần gấp
var a,b,c: real;
begin
write('nhap a: ');readln(a);
write('nhap b: ');readln(b);
c:= (a+b)/2;
write('Gia tri cua bieu thuc c=(a+b)/2 la: ',c);
end.
(chạy thử ct đi ^^!)
Viết chương trình nhập vào số tự nhiên N (N≤100) và tính giá trị của biểu thức sau:
A= 1 + 1/2 - 1/3 + 1/4 -1/5....+1/N
#include <bits/stdc++.h>
using namespace std;
int n,i;
double s;
int main()
{
cin>>n;
s=1;
for (i=2; i<=n; i++)
{
if (i%2==0) s=s+1/(i*1.0);
else s=s-1/(i*1.0);
}
cout<<fixed<<setprecison(2)<<s;
return 0;
}
Viết chương trình tính giá trị của biểu thức: D = 2(a+b)
(Với a, b là 2 số nguyên được nhập vào từ bàn phím.)
Viết chương trình tính giá trị của biểu thức: D = 2(a+b)
(Với a, b là 2 số nguyên được nhập vào từ bàn phím.)
Program HOC24;
var a,b: integer;
D: longint;
begin
write('Nhap a: '); readln(a);
write('Nhap b: '); readln(b);
D:=2*(a+b);
write('D = ',D);
readln
end.
Viết chương trình tính giá trị biểu thức sau
T=a!+b!+(a-b)!
Với a,b nguyên dương (a>b) được nhập vào từ bàn phím. Chương trình có sử dụng chương trình con hàm hoặc thủ tục
Program HOC24;
var t: longint;
a,b: integer;
function gt(x: integer): longint;
var i: integer; tich: longint;
begin
tich:=1;
for i:=1 to n tich:=tich*i;
gt:=tich;
end;
begin
write('Nhap a: '); readln(a);
write('Nhap b: '); readln(b);
t:=gt(a)+gt(b)+gt(a-b);
write('T = ',t);
readln
end.