Tính tổng điểm 3 môn Toán, Văn, Anh với Toán, Văn, Anh được nhập vào từ bàn phím in kết quả tổng điểm ra màn hình . Viết phần khai báo
Bài 4. Sử dụng biến trong chương trình
Mình viết luôn cho cả chương trình nha. Tick cho mình có động lực.
Program Tong_diem ;
uses crt ;
var t, v, a, T : integer ;
Begin
clrscr;
write (' Nhap diem mon toan:') ; readln (t) ;
write (' Nhap diem mon van:') ; readln (v) ;
write (' Nhap diem mon anh:') ; readln (a) ;
T:= t+v+a;
write ('Tong diem 3 mon la:',T);
readln;
End.
Đúng 0
Bình luận (1)
bạn có thể viết code như sau:
var t,v,a:longint;
begin
write('nhap diem toan:');readln(t);
write('nhap diem van:');readln(v);
write('nhap diem anh:');readln(a);
write('tong diem la:',t+v+a);
readln;end.
Đúng 0
Bình luận (0)
Mấy bạn cho mình hỏi cách lấy 2 chữ số sau dấu phẩy của số thập phân thì làm sao, trong pascal
bạn khai báo bien:x:2 trong đó bien là biến, x là số chữ số phần nguyên, 2 là 2 chữ số sau dấu phẩy
Đúng 0
Bình luận (0)
Lập lênh khai báo tính diện tích hình chữ nhật
Hãy nhập năm sinh của em để màn hình hiện ra số tuổi. Giúp mình với mai kt rồi :((
var sn:integer;
begin
write('nhap nam sinh:');readln(sn);
write(2018-sn,'tuoi');
readln;end.
Đúng 0
Bình luận (0)
Viết chương trình tính tiền công lao động
- Đơn giá mỗi giờ là 15000 đồng
Nếu làm ngoài giờ hoặc ngày nghỉ được tính gấp đôi
-Dữ liệu nhập vào:
Số giờ bình thường, số giờ làm ngoài giờ
(viết giúp mình với sáng mai mình phải nộp cho cô rồi)
lập trình tính toán chi tiêu ăn vặt hàng ngày của em ( số tiền thay đổi theo ngày )
in ra màn hình kết quả
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.
Đơn giản bạn sẽ dùng một biến trung gian c nha bạn để chúng ta có thể hoán đổi 2 giá trị, tức nếu không có trung gian thì khi gán trực tiếp giá trị sẽ bị mất
program hoandoi_ab;
var a,b,c:integer;
begin
readln(a,b);
writeln(a, ' ',b);
c:=a;
a:=b;
b:=c;
writeln(a, ' ',b);
readln
end.
Đúng 0
Bình luận (0)
1) viết chương trình pascal nhập giá trị cho 2 số nguyên x,y từ bàn phím và in ra màn hình kết quả tính tổng 2 số đó.
2) Tương tự như bài 1 in ra kết quả tính hiệu
3) Tương tự như bài 1 in ra kết quả tính tích
4) Tương tự như bài 1 in ra kết quả tính thương
5) Viết chương trình pascal tính diện tích hình tam giác với độ dài 1 cạnh a chiều cao tương ứn gh ( a,h là các giá trị nguyên nhâp vào từ bàn phím)
Đọc tiếp
1) viết chương trình pascal nhập giá trị cho 2 số nguyên x,y từ bàn phím và in ra màn hình kết quả tính tổng 2 số đó.
2) Tương tự như bài 1 in ra kết quả tính hiệu
3) Tương tự như bài 1 in ra kết quả tính tích
4) Tương tự như bài 1 in ra kết quả tính thương
5) Viết chương trình pascal tính diện tích hình tam giác với độ dài 1 cạnh a chiều cao tương ứn gh ( a,h là các giá trị nguyên nhâp vào từ bàn phím)
mọi người gíu e đi ạ, e đang cần gấp
e camon trc ạ
Đúng 0
Bình luận (0)
1. var x: integer;
begin
write('nhap x:');readln(x);
write('nhap y:');readln(y);
write('tong hai so nguyen x, y la',x+y,);
readln;
end.
2.
2. var x: integer;
begin
write('nhap x:');readln(x);
write('nhap y:');readln(y);
write('hieu hai so nguyen x, y la',x-y,);
readln;
end.
3. var x: integer;
begin
write('nhap x:');readln(x);
write('nhap y:');readln(y);
write('tich hai so nguyen x, y la',x*y,);
readln;
end.
4. var x: integer;
begin
write('nhap x:');readln(x);
write('nhap y:');readln(y);
write('thuong hai so nguyen x, y la',x/y,);
readln;
end.
1. var a,h: integer;
begin
write('nhap a:');readln(a);
write('nhap h:');readln(h)
write('dien tich tam giac la',(a*h)/2);
readln;
end.
chỉ là kết quả tham khảo nhé bạn
Nếu sai thì bạn sửa nhé
Đúng 0
Bình luận (0)