calculo da somatoria da diagonal principal
Publicado por NewLinuxer 13/12/2005
[ Hits: 11.882 ]
Programa para calcular a soma dos elemntos da diagonal principal d euma matriz 2x2
PROGRAM EXERCICIO5; USES CRT; VAR MATRIZ: ARRAY[1..2,1..2] OF REAL; LINHA, COLUNA: INTEGER; SOMA:REAL; BEGIN CLRSCR; SOMA:=0; FOR LINHA:=1 TO 2 DO BEGIN FOR COLUNA:=1 TO 2 DO BEGIN WRITE('DIGITE O NUMERO DA LINHA ',LINHA,', COLUNA ',COLUNA,': '); READLN(MATRIZ[LINHA,COLUNA]); IF LINHA=COLUNA THEN SOMA:= SOMA+MATRIZ[LINHA,COLUNA]; END; END; WRITELN; WRITELN('A SOMA DA DIAGONAL PRINCIPAL DA MATRIZ : ',SOMA:2:3); READKEY; END.
Coleta de dados de alunos em Pascal
Aprenda a Gerenciar Permissões de Arquivos no Linux
Como transformar um áudio em vídeo com efeito de forma de onda (wave form)
Como aprovar Pull Requests em seu repositório Github via linha de comando
Aplicativo simples para gravar tela
Quebra de linha na data e hora no Linux Mint
Firefox não abre em usuário não administradores (0)
Sempre que vou baixar algum pacote acontece o erro dpkg (8)
tentando instalar em um notebook antigo o Linux LegacyOS_2023... [RESO... (8)
Problema com Conexão Outlook via Firewall (OpenSUSE) com Internet Fibr... (5)