Viết chương trình nhập vào dãy số nguyên n phần tử và xuất ra màn hình N nhập từ bàn phím Mn giúp vs mai thi rồi <3

2 câu trả lời

program ct;

uses crt;

var i,n:integer;

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

begin

clrscr;

write('nhap n:=');readln(n);

for i:= 1 to n do

begin

write('nhap mang A[',i,']:=');readln(A[i]);

end;

writeln('day so vua nhap la:');

for i:=1 to n do

write(A[i]:4);

readln

end.

Program Hotboy;

Uses crt;

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

sn : longint;

Begin

Clrscr;

s:=0;

Write('nhap so n');

For i:=1 to n do

Write('A[',i,']');

Readln(A[i]);

For i:=1 to n do

Write(A[i]);

Readln

End.

Câu hỏi trong lớp Xem thêm
3 lượt xem
2 đáp án
9 giờ trước