Viết chương trình nhập vào 1 dãy số nguyên dương có n phần tử (n là số nguyên dương nhập từ ban phím), xuất dãy số ra màn hình. Cho biết dãy số có bao nhiêu số chính phương. Số chính phương là số khi...

1

LT

lê thị bích ngọc

19 tháng 11 2021

bạn hỏi khó thế, đây mới là phần cho lớp 8 thôi mà

BN

Bùi Ngọc Khánh Huyền

6 tháng 8 2023

1. Viết chương trình nhập vào n số nguyên từ bàn phím. Hãy in ra màn hình
các số chính phương có trong dãy vừa nhập? Cho biết số lớn nhất trong dãy?

1

NL

Nguyễn Lê Phước Thịnh

6 tháng 8 2023

uses crt;

var a:array[1..100] of integer;

i,n,ln:integer;

begin

clrscr;

readln(n);

for i:=1 to n do

readln(a[i]);

ln:=0;

for i:=1 to n do

if trunc(sqrt(A[i]))=sqrt(a[i]) then

begin

write(a[i]:4);

if ln<A[i] then ln:=A[i];

end;

writeln;

writeln('So chinh phuong lon nhat la: ',ln);

readln;

end.

BN

Bùi Ngọc Khánh Huyền

6 tháng 8 2023

mình chạy thử nhưng không ra kq ạ?

Viết chương trình nhập vào dãy số gồm có N phần tử a1, a2, a3,…,an (N<=100). Các phần tử của dãy số là các số nguyên (với n là số nguyên dương được nhập vào từ bàn phím). Thực hiện các yêu cầu sau:.a. In ra màn hình giá trị của các phần tử vừa nhập Tính tổng các số vừa nhập và in kết quả ra màn...

NT

Ngọc Ty

24 tháng 4 2023

1

KV

Kiều Vũ Linh

24 tháng 4 2023

Var a:array[1..100] of integer;

i,n:integer;

s:longint;

Begin

Write('n = ');readln(n);

For i:=1 to n do

Begin

Write('Nhap phan tu thu ',i,' = ');readln(a[i]);

s:=s+a[i];

End;

Write('Cac phan tu vua nhap la ');

For i:=1 to n do

Write(a[i]:8);

Writeln;

Write('Tong cua chung la ',s);

Readln

End.

Nhập vào số nguyên dương n (0<N<100) và dãy n số nguyên dương. Viết chương trình in ra các số là số chính phương và các số là số nguyên tố có trong dãy, nếu dãy không có số chính phương và không có số nguyên tố thì thông báo ‘dãy không có số chính phương, nguyên tố' ngôn ngữ pascal (ko dùng hàm)....

LG

Lê Gia Huy

5 tháng 1 2023

#Tin học lớp 9

0

QM

Quỳnh's Mun's

29 tháng 4 2021

a, Viết chương trình pascal nhập vào một dãy số nguyên n từ bàn phím b, in dãy vừa nhập ra màn hình. c, đếm xem bao nhiêu số dương. d, in kết quả số dương ra màn hình.

1

ML

Minh Lệ

29 tháng 4 2021

Program HOC24;

var a: array[1..32000] of integer;

i,n,d: integer;

begin

write('Nhap N: ');

for i:=1 to n do

begin

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

end;

write('Day vua nhap la: ');

for i:=1 to n do write(a[i],' '); writeln;

d:=0;

for i:=1 to n do if a[i]>0 then d:=d+1;

write('Co ',d,' so duong');

readln

end.

VV

Vẹt Vẹt

19 tháng 4 2022

viết chương trình nhập vào một dãy số nguyên . số phân tử của dãy được nhập từ bàn phím a, in ra dãy số vừa nhập ra màn hình b, tính tổng các phân tử dương có trong dãy số

1

NL

Nguyễn Lê Phước Thịnh

20 tháng 4 2022

uses crt;

var a:array[1..100]of integer;

i,n,t:integer;

begin

clrscr;

readln(n);

for i:=1 to n do readln(a[i]);

for i:=1 to n do write(a[i]:4);

writeln;

t:=0;

for i:=1 to n do

if a[i]>0 then t:=t+a[i];

writeln(t);

readln;

end.

VV

Vẹt Vẹt

30 tháng 4 2022

Ý a vs ý b đâu

bn

HT

Ha Tran

14 tháng 4 2023

Viết chương trình nhập từ bàn phím dãy số nguyên gồm n phần tử. Xuất ra màn hình dãy số vừa nhập

1

NB

Ngô Bá Hùng

14 tháng 4 2023

n = int(input("Nhập số phần tử của dãy số: "))
numbers = []

# Nhập dãy số nguyên
for i in range(n):
num = int(input(f"Nhập số thứ {i+1}: "))
numbers.append(num)

# Xuất dãy số nguyên
print("Dãy số vừa nhập là:", end=" ")
for num in numbers:
print(num, end=" ")

NH

Nguyễn Hoàng Duy

15 tháng 4 2023

Nếu lớp 10 về viết chương trình thì bạn nên sử dụng Python, còn lớp 8 và 11 vẫn Pascal bạn nhé.

HT

Ha Tran

14 tháng 4 2023

Viết chương trình nhập từ bàn phím dãy số nguyên gồm n phần tử. Xuất ra màn hình dãy số vừa nhập

1

PS

Phía sau một cô gái

14 tháng 4 2023

program nhapdayso;

var

a: array[1..100] of integer;

n, i: integer;

begin

write('Nhap so phan tu cua day: ');

readln(n);

for i := 1 to n do

begin

write('Nhap phan tu thu ', i, ': ');

readln(a[i]);

end;

writeln('Day so ban vua nhap la:');

for i := 1 to n do

write(a[i], ' ');

readln;

end.

Nhập vào số nguyên dương N (N ≤ 100) và dãy A gồm N số nguyên dương A1, A2, …, AN (Ai ≤2.1019). In ra màn hình số chính phương lớn nhất trong dãy A. Nếu trong dãy không có số chính phương nào thì in ra giá trị là...

N

nguyentienlam

4 tháng 4 2023

#Tin học lớp 7

1

N

nguyentienlam

4 tháng 4 2023

cứu m vs