Hỏi đáp về Kiểu dữ liệu có cấu trúc - Tin học 11

Chương trình sau đây giải bài toán trên:

program Diag;

var

N, i, j, max, Ind, Vsp: integer;

A: array[1..15, 1..15] of integer;

begin

write(‘Nhap N:’);

readln(N),

for i:= 1 to N do for j:= 1 to N do

begin

write(’A[‘,i,’,’,j,’]= ‘);

readln(A[i,j]);

end;

for i:=1 to N do

begin

Max:= A[i,i]; Ind:= 1;

for j:= 2 to N do

if A[i,j] > Max then begin

Max: = A [ i, j ], Ind: = j ‘n

end;

Vsp: =A[i, i] ,A[i,i]:=Max; A[i, Ind] :=Vsp;

end;

for i:= 1 to N do

begin

writeln;

for j:= 1 to N do write(A[i,j]:3);

end;

writeln

End.

Hãy sửa lại chương trình trên khi yêu cầu bài toán thay dòng bằng cột.

program BT8;

const NMax = 50;

type Mass = array [1…NMax, O..NMax-1] of real;

var A: Mass;

i,j N: byte; C: real;

begin

Write (‘Nhap N= ?’);

readln(N); for i:= 1 to N do

for 0 to N-1 do

begin

write(‘A[i,j; readln(A[i,j ] )

end,

for i:= 1 to N do

for j:= 1 to N-1 do

begin

C:= A[i,j];

A[i , j ] := A[N-i+1, j ]

A [N-i+1,j] := C;

end;

for i:=1 to N do begin

for j : =1 to N— 1 do write (A [ i, j ] : 5 : 2 , ‘ ‘);

writeln

end;

End.

Viết chương trình nhập từ bàn phím số nguyên dương N và đưa ra màn hình số hạng thứ N của dãy Phi-bo-na-xi. Chương trình của bạn thực hiện với giá trị lớn nhất của N là bao nhiêu?

a) Số lượng số chẵn và số lượng số lẻ

b) số lượng số nguyên tố trong dãy

-Thiết kế cấu trúc dữ liệu

-Thiết kế giải thuật

- Sử dụng ngôn ngữ C/C++ cài đặt thuật toán trên

1) Dãy A gồm N số nguyên ( N <= 100) gồm các số A_1,A_2,.....N

a) Nhập dãy A từ bàn phím hoặc tạo số ngẫu nhiên 

b) Tính Tổng số chẵn trong dãy A

c) đếm trong dãy A có bao nhiêu số = 0

d) In các số nguyên tố trong dãy A

2) nhập xâu tối da 50 ký tự là họ tên của 1 người 

a) đếm trong  xâu vừa nhập có bao nhiêu từ 

b) kiểm tra màn hình tên của người đó