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.
program xuat_hien_k_lan;
uses crt;
var i,n,k,j:integer;
a,b:array[1..100]of integer;
begin
clrscr;
write('nhap n:');readln(n);
for i:=1 to n do
begin
write('a[',i,']=');readln(a[i]);
end;
write('nhap k:');readln(k);
for i:=1 to n do
begin
for j:=i to n do
if a[i]=a[j] then inc(b[i]);
end;
for i:=1 to n do
if b[i]>=k then write(a[i]:5);
readln;
end.
1B 4C
2A 5A
3C 6C
7.
program TBC;
uses crt;
var a,b,tbc:real;
begin
clrscr;
write('nhap so a:');readln(a);
write('nhap so b:');readln(b);
tbc:=(a+b):2;
writeln('tbc cua hai so a va b la:',tbc:6:2);
readln;
end.
* Mô tả thuật toán:
- Nhập a;
- Nếu a<100 then với giá 1200đ ngược lại với giá 2000đ;
- In kết quả ra màn hình và kết thúc.
* Viết chương trình:
program Tien_dien;
uese crt;
var a,S:integer;
begin
clrscr;
write('Hay nhap KW tiêu thụ');readln(a);
if a<100 then S:=100*1200 else S:=100*2000;
writeln('So tien ho gia dinh can tra:',S);
readln
end.
(mk hk chắc nha bạn mk chỉ pk nhiêu đây thôi)
Một chiếc gậy cứng cáp, bền chắc thường được sản xuất từ các loại gỗ cứng, phổ biến nhất là:
👉 Phổ biến và dễ gặp nhất để làm gậy cứng cáp là gỗ lim.
Nếu là gậy học sinh / gậy thể thao thì còn có gỗ tre già (tre trúc) vì vừa cứng vừa nhẹ.
o,k
mày bị thối não à đặt tên là tung tung ahahahah 🤣🤣🤣🤣🤣
đói ai hẻo