63) Viết chương trình nhập vào số nguyên dương 𝑛. Nhập tiếp dãy gồm 𝑛 số nguyên. Giả sử các phần tử trong dãy được đánh số thứ tự bắt đầu từ 1 đến 𝑛 theo th
63) Viết chương trình nhập vào số nguyên dương 𝑛. Nhập tiếp dãy gồm 𝑛 số nguyên. Giả sử các phần tử trong dãy được đánh số thứ tự bắt đầu từ 1 đến 𝑛 theo thứ tự nhập vào. Hãy tìm thứ tự của phần tử lớn nhất dãy. Nếu có nhiều phần tử cùng lớn nhất dãy thì chỉ ra thứ tự nhỏ nhất. 64) Viết chương trình nhập vào số nguyên dương 𝑛. Nhập tiếp dãy gồm 𝑛 số nguyên. Giả sử các phần tử trong dãy được đánh số thứ tự bắt đầu từ 1 đến 𝑛 theo thứ tự nhập vào. Hãy tìm thứ tự của phần tử dương nhỏ nhất dãy. Nếu có nhiều phần tử dương cùng nhỏ nhất dãy thì chỉ ra thứ tự nhỏ nhất. Nếu dãy không chứa phần tử dương thì in ra −1. 65) Viết chương trình nhập vào số nguyên dương 𝑛. Nhập tiếp dãy gồm 𝑛 số nguyên. Hãy đếm số lượng số của dãy vừa nhập có đúng 3 chữ số. *Lập trình pascal. Dùng longint, while, for, ... Ko dùng boolean, true-false, dấu [ ]. Thanks nhìuuu. Còn có 20 điểm à, cho hay nhất lun ấy :0
Lời giải 1 :
program Bai65;
uses crt;
var
a: array[1..10000] of longint;
n,i,d,dem : longint;
begin
clrscr;
write('Nhap n= ');readln(n);
for i:=1 to n do
begin
write('a[', i ,']= ');
readln(a[i]);
end;
for i:=1 to n do
begin
d:=0;
while a[i] <> 0 do
begin
a[i]:=a[i] div 10;
d:=d+1;
end;
If d = 3 then dem:=dem+1;
end;
write('So luong so co 3 chu so: ',dem);
readln;
end.
Thảo luận
Có thể bạn quan tâm
Bạn có biết?
Tin học, tiếng Anh: informatics, tiếng Pháp: informatique, là một ngành khoa học chuyên nghiên cứu quá trình tự động hóa việc tổ chức, lưu trữ, xử lý và truyền dẫn thông tin của một hệ thống máy tính cụ thể hoặc trừu tượng (ảo). Với cách hiểu hiện nay, tin học bao hàm tất cả các nghiên cứu và kỹ thuật có liên quan đến việc mô phỏng, biến đổi và tái tạo thông tin.
Nguồn : Wikipedia - Bách khoa toàn thưTâm sự 8
Lớp 8 - Năm thứ ba ở cấp trung học cơ sở, học tập bắt đầu nặng dần, sang năm lại là năm cuối cấp áp lực lớn dần nhưng các em vẫn phải chú ý sức khỏe nhé!
Nguồn : ADMIN :))Xem thêm tại https://loigiaisgk.com/cau-hoi or https://giaibtsgk.com/cau-hoi
Copyright © 2021 HOCTAPSGK