uses crt;
var a,b:real;
begin
clrscr;
write('Nhap diem cua ban thu nhat:'); readln(a);
write('Nhap diem cua ban thu hai:'); readln(b);
if a>b then writeln('Ban thu nhat cao diem hon');
if b>a then writeln('Ban thu hai cao diem hon');
if b=a then writeln('Hai ban bang diem nhau');
readln;
end.
viết chương trình nhập điểm 3 môn toán,ngữ văn, tiếng Anh của các bạn trong lớp , sau đó in ra màn hình điểm trung bình của phần toán , văn , tiếng Anh của cả lớp
viết chương trình nhập điểm các bạn trong lớp, sau đó in ra màn hình số bạn đạt kết quả học tập loại giỏi, khá, trung bình và kém theo tiêu chuẩn nhà trường
viết trương trình nhập vào điểm môn toán của hai bạn mạnh và thanh, hãy so sánh điểm của hai bạn và thông báo kết quả ra màn hình( điểm nhập vào nhỏ hơn 10 hoặc banwgf10)
1. Viết chương trình nhập vào một số nguyên dương n và in ra màn hình dãy số tự nhiên từ 1 tới n. 2. Viết chương trình nhập vào một số nguyên n và in ra màn hình các số nguyên chẵn trong khoảng từ 1 tới n.
Viết chương trình Pascal, đặt tên chương trình là tên của con sau đó tải file ảnh lên đây. Chương trình thực hiện công việc sau: Khai báo 1 mảng A chứa tối đa 50 số nguyên, nhập n từ bàn phím, nhập vào mảng A gồm n số, viết mảng A ra màn hình (tất cả các phần tử trên cùng 1 dòng?
Viết chương trình nhập vào một dãy số, chương trình chỉ dừng lại khi số nhập vào là số 0. In ra màn hình các kết quả sau: - In ra tổng của các số chẵn đã nhập vào? - In ra tích của các số lẻ đã nhập vào?
Giúp tui với mn ơi
Em hãy viết chương trình nhập vào mảng số nguyên gồm n phần tử, sau đó in ra màn hình các giá trị phần tử là số chẵn trong mảng.
Viết chương trình nhập dãy số gồm 100 số nguyên và in các số đó ra màn hình ( các số trong dãy số in ra trên một hàng, mỗi số cách nhau 2 kí tự
Viết chương trình nhập biến mảng M gồm 100 phần tử thuộc kiểu số nguyên +nhập các phần tử và in ra màn hình + tìm và in ra màn hình giá trị lớn nhất trong dãy số vừa nhập +tìm và in ra màn hình giá trị nhỏ nhất trong dãy số vừa nhập
