Câu hỏi:

27/06/2023 161

Viết chương trình pascal nhập vào 30 phần tử số thực và in ra 1 cột số lớn hơn hoặc bằng 5 và tính tổng dãy số đó

Sale Tết giảm 50% 2k7: Bộ 20 đề minh họa Toán, Lí, Hóa, Văn, Sử, Địa…. form chuẩn 2025 của Bộ giáo dục (chỉ từ 49k/cuốn).

20 đề Toán 20 đề Văn Các môn khác

Quảng cáo

Trả lời:

verified
Giải bởi Vietjack

Lời giải:

uses crt;

var a:array[1..30]of real;

i:integer;

t:real;

begin

clrscr;

for i:=1 to 30 do

begin

write('A[',i,']='); readln(a[i]);

end;

writeln('Cac so lon hon 5 trong day la: ');

t:=0;

for i:=1 to 30 do

if a[i]>5 then

begin

write(a[i]:4:2,' ');

t:=t+a[i];

end;

writeln;

writeln('Tong cac so lon hon 5 trong day la: ',t:4:2);

readln;

end.

CÂU HỎI HOT CÙNG CHỦ ĐỀ

Câu 1:

Trong bảng phân quyền, các quyền truy cập dữ liệu, gồm có:

Xem đáp án » 27/06/2023 44,747

Câu 2:

Phần mềm nào sau đây không phải là hệ quản trị cơ sở dữ liệu quan hệ

Xem đáp án » 28/06/2023 42,196

Câu 3:

Câu nào là đúng. Sau khi tạo cấu trúc cho bảng thì:

Xem đáp án » 27/06/2023 41,030

Câu 4:

Trong bảng sau đây, mỗi học sinh chỉ có mộ mã số (Mahs):


Khoá chính của bảng là:

Xem đáp án » 27/06/2023 18,117

Câu 5:

Bảo mật CSDL:

Xem đáp án » 27/06/2023 17,674

Câu 6:

Phát biểu nào sai trong các phát biểu sau khi nói về khoá chính?

Xem đáp án » 27/06/2023 14,503

Câu 7:

Sau khi tạo liên kết giữa các bảng trong mô hình dữ liệu quan hệ, có thể thực hiện công việc nào dưới đây?

Xem đáp án » 28/06/2023 13,897

Bình luận


Bình luận