uses crt;
var x,y:integer;
begin
clrscr;
write('Nhap x='); readln(x);
write('Nhap y='); readln(y);
writeln(x+y);
readln;
end.
uses crt;
var x,y:integer;
begin
clrscr;
write('Nhap x='); readln(x);
write('Nhap y='); readln(y);
writeln(x+y);
readln;
end.
nhập vào từ bàn phím một dãy số nguyên(sử dụng chương trình con), tính tổng các phần tử đó, in ra màn hình( sử dụng chương trình con), sắp xếp dãy số nguyên thành dãy không giảm(sử dụng chương trình con)
Viết chương trình nhập vào bàn phím mảng 1 chiều A gồm N(N<=200) phần tử nguyên .Tính và viết ra màn hình tổng các số âm có trong mảng A (chương trình sử dụng chương trình con kiểm tra số nguyên âm của số m để viết)
Nhập vào 3 số a,b,c có giá trị từ ( 1 ≤ a,b,c ≤ 6) In ra màn hình giá trị bất kì x,y,z (1≤ x,y,z ≤ 6) và tính tổng của 3 số x,y,z
Lập chương trình có sử dụng thử tục (Procedure) để tính lũy thừa nguyên của cơ số nguyên dương. Cả hai số này được đọc vào từ bàn phím. Khi người dùng nhập vào cơ số âm thì phải thông báo: “không có lũy thừa cơ số âm, vào lại dữ liệu”.(pascal)
C++ : Viết chương trình sử dụng chương trình con
VD: Cho mảng a có N phần tử ( N là số nguyên)
a) Nhập/ Xuất mảng
b) Tính tổng giá trị chẵn/ lẽ của các phần tử trong mảng
c) Đưa ra màn hình các giá trị chẵn/ lẽ trong mảng
d) Tính trung bình cộng các giá trị chẵn/ lẻ trong mảng e) Đưa ra giá trị nhỏ/ lớn nhất của mảng
nhập từ bàn phím số nguyên dương n đưa ra kết quả tính tổng các số có 5 chữ số chia hết cho n
Bài 2: Viết chương trình nhập vào một số thực X (0<X<=10) và tìm ra số tự nhiên nhỏ nhất N sao cho: 1+1/2+1/3+...+1/N>X.
Hãy xây dựng hàm tính tổng hai số thực. Viết chương trình sử dụng hàm tính tổng hai số thực để tính tổng của ba số thực nhập từ bàn phím và ghi kết quả ra màn hình
Viết chương trình pascal để nhập 1 mảng gồm n số nguyên dương a1...an.sau đó in ra màn hình giá trị lớn nhất của dãy số