soma de matrizes
Publicado por NewLinuxer 13/12/2005
[ Hits: 11.865 ]
Programam para efetuar a soma de duas matrizes 3x4
PROGRAM EXERCICIO7; USES CRT; VAR MATRIZ1, MATRIZ2, MATRIZ_SOMA: ARRAY[1..3,1..4] OF INTEGER; LINHA, COLUNA, MATRIZ: INTEGER; BEGIN CLRSCR; FOR MATRIZ:=1 TO 2 DO FOR LINHA:=1 TO 3 DO FOR COLUNA:=1 TO 4 DO BEGIN WRITE('DIGITE O NUMERO DA LINHA ',LINHA,', COLUNA ',COLUNA,', MATRIZ ',MATRIZ,': '); IF MATRIZ = 1 THEN READLN(MATRIZ1[LINHA,COLUNA]); IF MATRIZ = 2 THEN BEGIN READLN(MATRIZ2[LINHA,COLUNA]); MATRIZ_SOMA[LINHA,COLUNA]:=MATRIZ1[LINHA,COLUNA]+MATRIZ2[LINHA,COLUNA]; END; END; WRITELN; WRITELN('A SOMA DAS MATRIZES : '); WRITELN; FOR LINHA:=1 TO 3 DO BEGIN FOR COLUNA:=1 TO 4 DO WRITE(MATRIZ_SOMA[LINHA,COLUNA]:2,' '); WRITELN; END; READKEY; END.
Gerador de senha Pascal/Lazarus
Cáculo de Fatorial, utilizando-se de Repeat - Until
Nenhum coment�rio foi encontrado.
Atualizando o Passado: Linux no Lenovo G460 em 2025
aaPanel - Um Painel de Hospedagem Gratuito e Poderoso
O macete do Warsaw no Linux Mint e cia
Visualizar arquivos em formato markdown (ex.: README.md) pelo terminal
Dando - teoricamente - um gás no Gnome-Shell do Arch Linux
Como instalar o Google Cloud CLI no Ubuntu/Debian
Mantenha seu Sistema Leve e Rápido com a Limpeza do APT!
Procurando vídeos de YouTube pelo terminal e assistindo via mpv (2025)
Jogos baixados na Central de Aplicativos mas que não abrem (1)
debian com wayland, configuracao de teclado. Mudou Tudo! [RESOLVIDO] (1)
Iinstalar o Scanner Kodak i940 no Linux Mint 19/20? (3)
Pastas da raiz foram para a área de trabalho [RESOLVIDO] (11)