Uses crt;
Var
S,i,n:Integer;
a:array[1..100] of integer;
BEGIN
Write( ‘ Nhap so n:’ );
Readln( n );
For i:=1 to n do
begin
a[i]:=i;
s:=s+a[i]
end;
Writeln( ‘Tong = ’, S);
Readln;
END.
Uses crt;
Var
S,i,n:Integer;
a:array[1..100] of integer;
BEGIN
Write( ‘ Nhap so n:’ );
Readln( n );
For i:=1 to n do
begin
a[i]:=i;
s:=s+a[i]
end;
Writeln( ‘Tong = ’, S);
Readln;
END.
Viết chương trình Pascal sử dụng biến mảng để tính giá trị trung bình của n số nguyên nhập từ bàn phím.chiều dài của dãy cũng được nhập từ bàn phím.
viết chương trình biến mảng tính tổng của n số nguyên nhập từ bàn phím
đề thi hk2 đó ai zúp vs
Viết chương trình sử dụng biến mảng, nhập vào 1 dãy số nguyên từ bàn phím, in ra màn hình dãy số đó
Tin học 8
Giúp mk nhé!!!
viết chương trình nhập N số nguyên từ bàn phím. Tính và đưa ra màn hình tổng các phần tử trong mảng N chia hết cho 3?
mk cần gấp.
Viết chương trình Pascal thực hiện yêu cầu sau:
a)Sử dụng biến mạng , nhập vào dãy số nguyên từ bàn phím ,in ra màn hình dãy số đó
b)In ra màn hình tổng của dãy số đó
Bài 1: Viết chương trình nhập vào 1 số N nguyên dương và in ra màn hình các số
chẵn từ 0 đến N? (N là số tự nhiên được nhập vào từ bàn phím)
Gợi ý: Các số chẵn là các số chia 2 dư 0, ta có thể sử dụng mod để chia lấy phần
dư.
Bài 2: Viết chương trình nhập vào 1 số N nguyên dương và in ra màn hình các số
chẵn từ 0 đến N, sao cho mỗi số chiếm 4 vị trí và 1 dòng có 15 số?
Gợi ý: Tương tự bài 4 (sử dụng thêm biến tạm để khi in ra 15 số thì xuống dòng).
GIải giúp mình mới mình đang cần gấp
a) viết chương trình nhập N số nguyên từ bàn phím và in ra màn hình số nhỏ nhất.
b) viết chương trình nhập N số nguyên từ bàn phím và in ra màn hình số lớn nhất.
Tin Học 8
Sử dụng câu lệnh for...to...do.Viết chương trình tính tổng của N số tự nhiên chẵn đầu tiên và in kết quả ra màn hình, với N được nhập từ bàn phím
Cảm ơn
viết chương trình tính tổng các chữ số cuả 1 số nguyên dương có 3 chữ số được nhập từ bàn phím