Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
Câu 1:
uses crt;
var a,b:integer;
begin
clrscr;
readln(a,b);
writeln((a+b)/2:4:2);
readln;
end.
program CT_dautien;
uses crt;
var a:integer;
begin
clrscr;
writeln('moi nhap so a');readln(a);
if a mod 2 = 0 then write(a, 'la so chan') else write(a, 'la so le');
readln
end.
{ đơn giá: a, số lượng: b}
uses crt;
var a,b,s,thanhtoan:integer;
begin
write('nhap gia don hang:');
read(a);
write('nhap so luong hang:');
s:=0;
thanhtoan:=0;
s:=a*b;
if s>100 then thanhtoan:= s*(30/100)
else thanhtoan:= s* (10/100);
write(' so tien can thanh toan la:',' ',thanhtoan);
readln;
end.
#include <iostream>
#include <string>
#include <algorithm>
int main() {
int n, k;
std::cin >> n >> k;
std::string number = std::to_string(n);
int numDigits = number.length();
if (k >= numDigits) {
std::cout << "0" << std::endl;
} else {
std::sort(number.begin(), number.end(), std::greater<char>());
number = number.substr(0, numDigits - k);
std::cout << number << std::endl;
}
return 0;
}
Lợn nhà là một giống loài được thuần hóa từ loài lợn rừng, được chăn nuôi để cung cấp thịt. Hầu hết lợn nhà có lớp lông mỏng trên bề mặt da. Lợn nhà thường được cho rằng là một phân loài từ tổ tiên hoang dã của chúng là lợn rừng.
Ở một số nước phát triển và đang phát triển, lợn thuần hóa là loài bản địa thường được nuôi thả ngoài trời hoặc trong chuồng. Ở một số vùng lợn được thả tìm thức ăn trong rừng có thể có người trông coi. Ở các quốc gia công nghiệp nuôi lợn thuần hóa được chuyển từ việc nuôi chuồng trại truyền thống sang hình thức nuôi công nghiệp. Nhờ đó mà có chi phí sản xuất thấp nhưng sản lượng lại cao
Lợn nuôi chủ yếu dùng để lấy thịt. Các sản phẩm khác từ thịt lợn như xúc xích, lạp xưởng, jambon. Đầu lợn có thể được dùng làm dưa da đầu lợn. Gan, huyết (huyết thường và huyết hậu) và các nội tạng khác cũng được dùng làm thực phẩm. Một số tôn giáo như Do Thái giáo và Hồi giáo, thịt lợn là thực phẩm cấm kỵ.
program Psmcg;
uses crt;
var don_gia, so_luong, tong_tien, phi_giao_hang: integer;
begin
write('Nhap so luong san pham: ');
readln(so_luong);
if so_luong <= 20 then
begin
don_gia := 50000;
end
else
begin
don_gia := 40000;
end;
tong_tien := don_gia * so_luong;
if tong_tien > 2000000 then
begin
phi_giao_hang := 0;
end
else
begin
phi_giao_hang := 15000;
end;
tong_tien := tong_tien + phi_giao_hang;
writeln('So tien khach hang phai thanh toan la: ', tong_tien);
readln;
end.
uses crt;
const tb=30000;
var tt, dg, sp: real;
ht, dc: string;
begin
clrscr;
write('Nhap ho ten khach hang: ');
readln(ht);
write('Nhap dia chi khach hang: ');
readln(dc);
write('Nhap don gia: ');
readln(dg);
write('Nhap so phut su dung: ');
readln(sp);
tt:=dg*sp+tb;
write('Quy khach phai tra: ',tt,' dong.');
readln
end.
Chúc em học tốt!