Câu 36. Mô tả các bước của kịch bản: nhân vật mèo tính diện tích hình tròn và thông báo.(mik cần gấp)
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.
TK:
Em không đồng ý với ý kiến “Phụ nữ chỉ nên làm những việc nội trợ, may vá, thêu thùa, không thể tham gia vào những công việc liên quan đến máy tính và Tin học” vì ngày nay với sự phát triển của công nghệ, rất nhiều phụ nữ đã tham gia các ngành học và công việc liên quan đến máy tính và Tin học như Tester, lập trình viên phần mềm, chuyên gia phân tích nghiệp vụ BA. Ngoài ra, phụ nữ hiện nay đang dần phá bỏ rào cản quan niệm xưa vì họ có nhiều thế mạnh để tham gia vào các công việc liên quan đến Tin học như tỉ mỉ, cẩn thận, trí nhớ tốt,…
Bạn thử code này nhé
program RENUM;
var
S: string;
frequency: array[0..9] of integer; // Mảng đếm số lần xuất hiện của các số từ 0 đến 9
maxFreq, maxNum, i, num: integer;
begin
// Khởi tạo tất cả các phần tử trong mảng đếm về 0
for i := 0 to 9 do
frequency[i] := 0;
// Nhập xâu ký tự S từ bàn phím
writeln('Nhap vao xau ky tu S: ');
readln(S);
// Đếm số lần xuất hiện của các số từ 0 đến 9 trong xâu S
for i := 1 to length(S) do
begin
if (S[i] >= '0') and (S[i] <= '9') then
begin
num := ord(S[i]) - ord('0');
frequency[num] := frequency[num] + 1;
end;
end;
// Tìm số có số lần xuất hiện nhiều nhất và nhỏ nhất
maxFreq := 0;
maxNum := 0;
for i := 0 to 9 do
begin
if frequency[i] > maxFreq then
begin
maxFreq := frequency[i];
maxNum := i;
end;
end;
// In ra số xuất hiện nhiều nhất
if maxFreq > 0 then
writeln('So xuat hien nhieu nhat la: ', maxNum)
else
writeln('Trong xau khong co so nao.');
readln;
end.
x = int(input("Nhap x="))
y = int(input("Nhap y="))
tong = x + y
hieu = x - y
tich = x * y
thuong = x / y
print("Tong x+y=", tong)
print("Hieu x-y=", hieu)
print("Tich x*y=", tich)
print("Thuong x/y=", thuong)