Hãy viết chương trình tính toán trong ngon ngữ lập trình Pascal
a) 15*2+1
b)15+5/2+10
Những câu hỏi liên quan
Câu 1:Sử dụng ngôn ngữ lập trình Pascal để viết chương trình theo thuật toán dưới đây:B1:T←8;n←1;B2:Nếu T99 thì chuyển tới B4B3:n←n+3;T←T*n và quay lại B2B4:In giá trị của T,n và kết thúcCâu 2:Sử dụng ngôn ngữ lập trình Pascal để viết chương trình nhập vào từ bàn phím(ĐTB)của n học sinh trong một lớp (1n70).In ra màn hình số lượng và tỉ lệ học sinh đạt điểm trung bình trở lên(ĐTB5.0)
Đọc tiếp
Câu 1:Sử dụng ngôn ngữ lập trình Pascal để viết chương trình theo thuật toán dưới đây:
B1:T←8;n←1;
B2:Nếu T>=99 thì chuyển tới B4
B3:n←n+3;T←T*n và quay lại B2
B4:In giá trị của T,n và kết thúc
Câu 2:Sử dụng ngôn ngữ lập trình Pascal để viết chương trình nhập vào từ bàn phím(ĐTB)của n học sinh trong một lớp (1<=n<=70).In ra màn hình số lượng và tỉ lệ học sinh đạt điểm trung bình trở lên(ĐTB>=5.0)
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.
Đúng 0
Bình luận (0)
Câu 2. Trong ngôn ngữ lập trình Pascal giả sử ở phần thân chương trình có 2 phép gán như sau:
A:=10;
B:= 5,5;
a. Em hãy viết lệnh khai báo biến cho 2 biến nói trên?
b. Viết lệnh thông báo giá trị của 2 biến A, B ra màn hình?
C1:Viết câu lệnh khai biến x có kiểu số nguyên và hằng a có giá trị bằng 5 trong ngôn ngữ lập trình Pascal. C2: Viết chương trình Pascal để: A) nhập vào 2 số nguyên x, y bất kỳ B) tính tổng 2 số đó C) in ra giá trị của tổng
Câu 2:
uses crt;
var x,y:int64;
begin
clrscr;
readln(x,y);
writeln(x+y);
readln;
end.
Đúng 1
Bình luận (0)
Viết chương trình tính tìm 2 số a và b khi biết tổng và hiệu của chúng
viết bằng ngôn ngữ lập trình pascal
uses crt;
var t,s:real;
begin
clrscr;
readln(t,s);
writeln('a=',(t+s)/2);
writeln('b=',(t-s)/2);
readln;
end.
Đúng 2
Bình luận (0)
Viết chương trình bằng ngôn ngữ tự nhiên và bằng ngôn ngữ lập trình Pascal ứng cho các bài toán sau. Tính và đưa ra màn hình tổng z=|x|+|y| với điểm (x>y) thuộc đường tròn bán kính r(r>0) tâm (a;b)
b, y=1+2+3+....+100
c, y=1+2+3+...+n cho đến khi y>3200
mk cần trong vòng 1 tiếng nữa . mong mọi người giúp mk , Cảm ơn nhiều ạ
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.
Đúng 1
Bình luận (0)
Bài tập 1: Em hãy viết chương trình cho bài toán sau bằng ngôn ngữ lập trình Pascal.
+ Nhập vào kích thước hai cạnh a, b của hình chữ nhật từ bàn phím.
+ Gán cho biến P(chu vi hình chữ nhật) giá trị là (a + b)* 2.
+ Gán cho biến S(Diện tích hình chữ nhật) giá trị là a*b.
+ Hiển thị lên mà hình thông báo
“ Gia tri cua P, Gia tri cua S”
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.
Đúng 0
Bình luận (0)
Câu 1: chuyển biểu thức toán học sang pascal: a. b. 15.(4 + 30 + 12) c. (a+b)2.(d+e)3 d. ax2 + bx +2c Câu 2: viết chương trình tính tích 2 số nguyên được nhập từ bàn phím.Câu 3: viết chương trình tính tổng 2 sô nguyên được nhập từ bàn phím.Câu 4: viết chương trình nhập vào 2 số nguyên a, b sau đó in a, b trước và sau khi hoán đổi vị trí ra màn hình.Câu 5: viết chương trình tính tiền hóa đơn mua một món hàng, biết phí dịch vụ của hó...
Đọc tiếp
Câu 1: chuyển biểu thức toán học sang pascal:
a.
b. 15.(4 + 30 + 12)
c. (a+b)2.(d+e)3
d. ax2 + bx +2c
Câu 2: viết chương trình tính tích 2 số nguyên được nhập từ bàn phím.
Câu 3: viết chương trình tính tổng 2 sô nguyên được nhập từ bàn phím.
Câu 4: viết chương trình nhập vào 2 số nguyên a, b sau đó in a, b trước và sau khi hoán đổi vị trí ra màn hình.
Câu 5: viết chương trình tính tiền hóa đơn mua một món hàng, biết phí dịch vụ của hóa đơn là 10.000đ và công thức tính tiền là:
Thành tiền = đơn giá * số lượng + phí dịch
Câu 6: Cho biết kết quả của các phép so sánh sau:
a, 2x + 1 = 0
b, x2 – 5 > 4
c, 112 > 100
d, x2 + 3 = 7
Câu 1:
b, 15*(4+30+12)
c, (a+b)^2*(d+e)^3
d, a*x^2+b*x+2*c
Đúng 1
Bình luận (0)
Câu 2:
#include <bits/stdc++.h>
using namespace std;
long long x,y;
int main()
{
cin>>x>>y;
cout<<x*y;
return 0;
}
Đúng 0
Bình luận (0)
Viết chương trình pascal thực hiện tính toán các biểu thức sau:
a) 7.(8 + 5 -2)-30+12
b)(15+5)^2.(6+4)^3
(Mình đg cần mong mn giúp, thanks ạ)
b: uses crt;
begin
clrscr;
writeln(sqr(15+5)*sqr(6+4)*(6+4));
readln;
end.
Đúng 1
Bình luận (0)
Một oto đi từ A đến B với vận tốc trung bình v(km/h)hết t(h).Tính quãng đường AB(biết v,t nhập từ bàn phím) 1. Xác định bài toán: +input +output 2.mô tả thuật toán(liệt kê các bước thực hiện) 3.sử dụng ngôn ngữ lập trình free pascal viết chương trình bài toán trên