!@##%%^#%#@^$($%#$^$%$$#^#%T^^U$
2125151616151611
SR em mới học python mà em cũng học lớp 6 :<<<<
Viết chương trình nhập vào 2 số nguyên (m,n). Kiểm tra xem số nào là số lớn và số lớn gấp mấy lần số bé. in kết quả ra màn hình.(làm trên pascal)
Xác định input, output của bài toán : viết chương trình nhập 2 số nguyên a, b từ bàn phím. So sánh 2 số và thông báo kết quả số lớn nhất, bé nhất ra màn hình.
Câu 1: Trong Pascal, khai báo nào sau đây là đúng?
A. var tb: real; B. const x: real, C. var R=30; D. var 4hs: integer;
Câu 2: Cho biết kết quả của biểu thức sau: (21 mod 3) div 2 + (15 div 4)
A. 10 B. 4 C. 5 D. 3
Câu 3 : Cho biết kết quả trả về của biểu thức sau: 20 mod (3 div 2) + (15 mod 4)
A. 4 B. 10 C. 3 D. 5
Câu 4: Để khai báo biến x thuộc kiểu số thực ta khai báo:
A. Var x: String; B. Var x: Real; C. Var x: Char; D. Var x: integer;
(giup mk nhé mk cân gấp ạ)
Viết chương trình Pascal thực hiện các yêu cầu sau:
- Nhập vào một dãy số gồm N số nguyên
- Hiển thị dãy số vừa nhập
- Tìm giá trị lớn nhất, nhỏ nhất trong dãy số trên
Xác định số lượng biến cần thiết và sử dụng ngôn ngữ lập trình Pascal để khai báo các biến cho bài toán sau:
Cho hai số nguyên A và B. Xác định kết quả của A*B và kết quả của A/B.
Giúp mình vs ạ
Tìm và sửa lỗi trong ct pascal sau:
var
i: integer;
diemToan, diemVan, diemAnh, diemTrungBinhToan, diemTrungBinhVan, diemTrungBinhAnh: real;
begin
diemTrungBinhToan := 0;
diemTrungBinhVan := 0;
diemTrungBinhAnh := 0;
for i := 1 to 100 do
begin
writeln('Nhap diem cua hoc sinh thu ', i, ' : ');
write('Diem Toan: ');
readln(diemToan);
diemTrungBinhToan := diemTrungBinhToan + diemToan;
write('Diem Van: ');
readln(diemVan);
diemTrungBinhVan := diemTrungBinhVan + diemVan;
write('Diem Anh: ');
readln(diemAnh);
diemTrungBinhAnh := diemTrungBinhAnh + diemAnh;
end;
diemTrungBinhToan := diemTrungBinhToan / 100;
diemTrungBinhVan := diemTrungBinhVan / 100;
diemTrungBinhAnh := diemTrungBinhAnh / 100;
writeln('Diem trung binh mon Toan la: ', diemTrungBinhToan:0:2);
writeln('Diem trung binh mon Van la ', diemTrungBinhVan:0:2);
writeln('Diem trung binh mon Anh la: ', diemTrungBinhAnh:0:2);
Readln;
End.
muốn in ra kết quả phép tìn : 10 div 5=? thì làm kiểu nào trong pascal đây ạ
ai làm giúp code bt pascal
Nhập 2 số a, b và 1 dấu bất kì từ bàn phím (+, -, *, /). Hãy in ra kết quả phép tính giữa a, b và dấu được nhập vào.
Nếu dấu + thì in ra kết quả của tổng a+b.
Nếu dấu - thì in ra kết quả của hiệu a-b.
Nếu dấu * thì in ra kết quả của tích a*b.
Nếu dấu / thì in ra kết quả của a/b.
INPUT | OUTPUT |
6 5 + | 6+5=11 |
6 5 * | 6*5=30 |
6 0 / | MAU SO =0 |
