Em hãy viết chương trình sủ dụng ngôn ngữ lập trình pascal để in ra màn hình nội dung sau:
Nhập giá trị hai biến a,b
Tính tổng hai biến đó (c:=a+b)
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.
Cho hai biến a,b, có kiểu dữ liệu số nguyên. Em hãy viết chương trình Pascal thực hiện các yêu cầu sau: a) Khai báo hai biến a,b. b) Nhập giá trị của hai biến a,b từ bàn phím. c) In kết quả tổng của a,b ra màn hình.
uses crt;
var a,b:int64;
begin
clrscr;
readln(a,b);
writeln(a+b);
readln;
end.
Cho hai biến a,b, có kiểu dữ liệu số nguyên.
Em hãy viết chương trình Pascal thực hiện các yêu cầu sau:
a) Khai báo hai biến a,b.
b) Nhập giá trị của hai biến a,b từ bàn phím.
c) In kết quả tổng của a,b ra màn hình.
uses crt;
var a,b:integer;
begin
clrscr;
readln(a,b);
writeln(a+b);
readln;
end.
Viết chương trình bằng ngôn ngữ lập trình Pascal để nhập vào N số nguyên từ bàn phím, tính tổng của các số vừa nhập và in ra màn hình giá trị tổng.
Uses crt;
var n,i,x,u: integer;
begin clrscr;
readln(n);
for i:=1 to n do begin
readln(x);
u:=u+x;
end;
writeln(u);
readln;
end.
program TongCacSoNguyen;
var
N, i, soNguyen, tong: integer;
begin
// Nhập số lượng N
write('Nhap so luong N: ');
readln(N);
// Khởi tạo tổng
tong := 0;
// Nhập và tính tổng các số nguyên
for i := 1 to N do
begin
write('Nhap so nguyen thu ', i, ': ');
readln(soNguyen);
tong := tong + soNguyen;
end;
// In ra màn hình tổng
writeln('Tong cua cac so nguyen la: ', tong);
readln;
end.
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.
trong ngôn ngữ lập trình C++giả sử ở phần thân chương trình có 2 phép gán như sau
m=2020;
q=3.1417853
a, em hãy viết lệnh khai báo cho 2 biến nói trên
b,viết lệnh thông báo giá trị của 2 biến m,q ra màn hình
sử dụng ngôn ngữ lập trình pascal. Viết chương trình in ra màn hình
-dòng thứ nhất các số nguyên từ 100->1
-dòng thứ hai số lượng các số nguyên tố
uses crt;
var i,j,kt:integer;
begin
clrscr;
for i:=100 to 1 do write(i:4);
writeln;
for i:=2 to 100 do
begin
kt:=0;
for j:=2 to trunc(sqrt(i)) do
if i mod j=0 then kt:=1;
if kt=0 then write(i:4);
end;
readln;
end.
Em hãy viết chương trình cho bài toán sau bằng ngôn ngữ Pascal
- Nhập 1 số nguyên K từ bàn phím
- Gán cho biến x giá trị là số dư của phép chia K cho 5
- Gán cho biến y giá trị là phần nguyên của phép chia biến K cho 5
- Hiển thị lên màn hình thông báo "giá trị của K/5=giá trị của y, dư giá trị của x
(VD:Nhập giá trị của K=16.Sẽ hiển thị lên màn hình dòng thông báo "16/5 - 3,dư 1"
uses crt;
var k,x,y:integer;
begin
clrscr;
readln(k);
x:=k mod 5;
y:=k div 5;
writeln(k,'/5=',x,' du ',y);
readln;
end.