soma da diagonal principal de uma matriz
Publicado por NewLinuxer 13/12/2005
[ Hits: 14.746 ]
progrma para efetuar a soma da diagonal principal de uma matriz, após armazenar esta em um vetor.
PROGRAM EXERCICIO2; USES CRT; VAR MATRIZ: ARRAY[1..7,1..7] OF INTEGER; VETOR: ARRAY[1..7] OF INTEGER; SOMATORIA, LINHA, COLUNA: INTEGER; BEGIN SOMATORIA:=0; CLRSCR; FOR LINHA:=1 TO 7 DO FOR COLUNA:=1 TO 7 DO BEGIN WRITE('DIGITE O NUMERO DA LINHA ',LINHA,', COLUNA ',COLUNA,': '); READLN(MATRIZ[LINHA,COLUNA]); IF LINHA=COLUNA THEN VETOR[LINHA]:=MATRIZ[LINHA,COLUNA]; END; FOR LINHA:=1 TO 7 DO SOMATORIA:= SOMATORIA+VETOR[LINHA]; WRITELN('A SOMATORIA DOS VALORES DO VETOR : ',SOMATORIA); READKEY; END.
Array de números aleatórios não-repetidos de um intervalo em Pascal
Transformação entre as escalas térmicas Kelvin, Fahrenheit e Celcius
armazenar estoque em uma matriz
programa para selecionar os números em posições impares em array de 19 espaços e calcular a media
Nenhum comentário foi encontrado.
Como gerar um podcast a partir de um livro em PDF
Automatizando digitação de códigos 2FA no browser
Resolver problemas de Internet
Como compartilhar a tela do Ubuntu com uma Smart TV (LG, Samsung, etc.)
Conheça a 4Devs, caixa de ferramentas online para desenvolvedores
Como converter um vídeo MP4 para um GIF para publicar no README.md do seu repositório Github
Como Instalar o Microsoft Teams no Linux Ubuntu