function max(a,b:integer):integer;
begin
max:=a;
if max<b then max:=b;
end;
function max(a,b:integer):integer;
begin
max:=a;
if max<b then max:=b;
end;
viết chương trình tìm giá trị nhỏ nhất trong 3 số a,b,c nhập từ bàn phím sử dụng hàm tìm số nhỏ nhất trong 2 số x và y
2. Sử dụng hàm và thủ tục để viết chương trình tính tổng các số chẵn, lẻ trong xâu
Viết hàm để kiểm tra 3 số a,b,c có phải là 3 cạnh của tam giác ABC hay không ?
Viết hàm để kiểm tra một số nguyên N có phải là số chính phương hay không ?
nhập 1 mảng số nguyên dương <10^6
a) in ra số đối xứng lớn nhất b) in ra số đảo ngược lớn nhất c)tìm cắp số có ucln là lớn nhất d) viết ra số nguyên tố cố tổng các chữ số của nó lớn nhấtbai5.inp | bai5.out |
5 7 9 123 31 |
9 123 9 123 7 |
Ai giải hộ em với ạ . Em cảm ơn
viết phương trình cho phép nhạp 2 số nguyên dương bất kì từ bàn phím , tìm và đưa ra màn hình bội chung nhỏ nhất của 2 số nguyên dương vừa nhập trong chương trình có sử dụng chương trình con tìm ước chung lớn nhất của 2 số nguyên dương
1- Viết chương trình con tính diện tích hình tròn bán kính R ( sử dụng thủ tục hoặc hàm)
2- Viết chương trình con tính diện tích tam giác khi biết đáy và chiều cao nhập từ bàn phím.( sử dụng 1 thủ tục hoặc hàm để tính diện tích)
3- Viết chương trình con tính diện tích tam giác với độ dài các cạnh nhập từ bàn phím.(sử dụng 1 thủ tục hoặc hàm )
Viết hàm để tính sô lần của xâu S1 xuất hiện trong xâu S2 .