16 replies to this topic

[Paulo André]

alguem tem alguma ideia de como eu faria um sistema de multiplicacao de matrizes?

obrigado....

Até mais

[Felipe Pena]

Veja um exemplo com vetores:

#include <stdio.h>
#include <stdlib.h>

int main()
{
    int x[6] = {1, 2, 3, 4, 5};
    int y[6] = {5, 4, 3, 2, 1};
    int i;

    for (i = 0; x[i]; i++)
        printf("x(%d) * y(%d) = %d\n", x[i], y[i], x[i] * y[i]);

    system("PAUSE");
    return 0;
}

Agora dá pra ter uma base, se é que sua dúvida estava incluida no código acima.

[]'s

[Ernesto Oleques]

Multiplica duas matrizes
(acho que são essas as regras para se multiplicar duas matrizes):

Program multiplicacao_de_matrizes; 
Var matrizA: array [1..50,1..50] of integer; 
	matrizB: array [1..50,1..50] of integer; 
	matrizAB: array [1..50,1..50] of integer; 
	lin1, col1, lin2, col2, i, j, k: integer; 

Begin
 
	 writeln;
 
	 writeln('--------  Multiplicação de 2 matrizes  --------'); 
	 
	 writeln;
	 
	 writeln('Para ser possivel a multiplicação de duas matrizes');
	 writeln('	o numero de colunas da primeira matriz');
	 writeln(' deve ser igual ao numero de linhas da segunda');
	 
	 writeln;
	 
	write('Digite o numero de linhas da primeira matriz: '); 
	 readln(lin1);
	 
	write('Digite o numero de colunas da primeira matriz: '); 
	readln(col1);
	
	writeln;
	
	write('Digite o numero de linhas da segunda matriz: '); 
	readln(lin2);
	
	write('Digite o numero de colunas da segunda matriz: '); 
	readln(col2);  
	 
	 writeln;
	 
	 if ((col1)=(lin2)) then
	 begin
	 
	 writeln('Escreva os elementos da matriz A: ');	  
	 for i:=1 to lin1 do 
	  begin
		   for j:=1 to col1 do 
		   begin 
			   write('a',i,j,': '); 
			   readln(matrizA[i,j]); 
		   end;
	  end; 
	 
	  writeln;
	 
		 writeln('Escreva os elementos da matriz B: ');	  
	  for i:=1 to lin2 do 
	  begin 
		  for j:=1 to col2 do
		  begin 
			   write('b',i,j,': '); 
			   readln(matrizB[i,j]);
		  end;
	  end; 
	 
 
	  for i:=1 to lin1 do 
	  begin 
		  for j:=1 to col2 do 
		  begin
			   matrizAB[i,j]:=0; 
			   for k:=1 to lin1 do 
			   matrizAB[i,j]:=matrizAB[i,j]+matrizA[i,k]*matrizB[k,j];
		  end; 
	  end; 

	  writeln;
	 
	  writeln('A matriz A*B :'); 
	  for i:=1 to lin1 do 
	  begin 
		  for j:=1 to col2 do
		  write('ab',i,j,': ', matrizAB[i,j],' '); 
		  writeln;
	  end; 
	 end else writeln('Nao eh possivel multiplicar essas matrizes');
End.

by Ernesto

[HaroNism]

Acheter Du Tadalis Sx En Pharmacie Forum Viagra Alcool Vendita Viagra Napoli cialis Cialis Effet Avis E' Sicuro Comprare Viagra On Line

[Miguceamma]

Cephalexin 500mg Does Without Prescription Metronidazole Tablets Uk cialis Liquid Dramamine Cipa Canadian Pharmacy Accutane
Pfizer Viagra On Sale cialis buy online Order Levitra On Line Cephalexin Side Effects Indogs

[LarPhozyHah]

Discount Stendra Quick Shipping Website Overseas Cod Accepted How To Pronounce Keflex viagra Amoxicillin Dosage Adult Male 220 Pounds

[RonsisM]

Buy Diuretics Online Without Prescription Viagra Pfizer Bewertung Cialis En Tunisie viagra Poor Nutrition Propecia Viagra Rezeptfrei Schweiz Farmacia Online Propecia
Direct Isotretinoin Where To Order Medication Without Rx West Lothian online pharmacy Order Levitra Without A Prescription

[HaroNism]

Propecia Packungsgro?E Buy Doxycycline Boots viagra cialis Azithromycin
Pastilla Cialis Y Alcohol viagra Canadian Pharcharmy Online Buy Doxycycline In The Us

[LarPhozyHah]

Mail Order Tab Amoxicilina In Internet Uni buy viagra online Cialis El Pais Depo Amoxicillin Propecia Sin Efectos Secundarios
Acheter Lasix viagra Bronchial Infection Amoxicillin
Lodine Online Without Precription Caracteristiques Clomid online pharmacy 2064 Prednisone For Sale Levitra Posologie Prix Cytotec

[HaroNism]

Sildenafil 100mg 30 Pills buygenericlevitraonlineusa Cialis Livraison Rapide En France
Ox Shelf Life Of Cephalexin viagra Do You Need A Prescription For Estrace Brand Viagra Online Canadian Pharmacy

[fapedlok]

Discounts! top products for 2017


Products which fall under this return policy can be returned domestically, as long as they are unused and in the original packaging. No questions asked!
If a product that falls under this guarantee is found to be counterfeit, you will get a full refund (shipping costs included).


READ MORE
7a brazilian virgin hair body wave 3 bundles lot human hair weave brazilian hair weave bundles ( 52.50 $)
ZoneAlarm | Maximum Protection. Best Performance. Great Price!
1 Case +30 Rolls Mixed Colors Nail Rolls Striping Tape Line DIY Nail Art Tips Decoration Sticker Nail Art Metallic Yarns Strips ( 4.86 $)
Kerui 99 wireless touch panel+lcd tft display gsm pstn sms home security voice burglar alarm engllish russian spanich france ( 131.39 $)
Merc | Clothing and footwear | Official store in Russia ©
Ulefone Be Touch 3 4G Phablet-149.14 $
Gold Plated Womens Ring ( 91.20 $)
Deem Deem Tana — Lyric Video / Shor In The City / Sachin Jigar / Tushar Kapoor
Ariana Grande — Everyday (Lyric Video) ft. Future
Newest Car Camera Car Dvr Blue Review Mirror Digital Video Recorder Auto Registrator Camcorder Full HD 1080P Camera Car Dvrs ( 59.98 $)
2015 newest fashionable cool men's clothing jumpsuit men slim plus size s l m l xl ( 142.80 $)
Simple short sleeve scoop collar button design women's crop top ( 8.90 $)
Ruthenium Plated Sterling Silver Cut Out Tiger Bracelet ( 138.00 $)
Indian Virgin Hair Water Wave 4 Bundle Indian Curly Virgin Hair Raw Indian Water Wave Virgin Hair Curly Weave Human Hair Bundles ( 50.00 $)
7a grade brazilian straight virgin hair 4pcs unprocessed virgin brazilian hair weave bundles 100% brazilian virgin hair straight ( 111.72 $)

[HaroNism]

Zithromax Dosage Chart By Weight Buy Nexium Online Uk viagra Comprar Viagra Online Sin Receta Medica Md Price Pharmacy Discounts
Cheap Valtrex Uk Precio De Priligy 30 Mg Recensione Kamagra Generic cialis Levitra Nuevo
Amoxicillin Dosage For Cats Bentyl Muscle Spasms Internet Mastercard Accepted Without Perscription Swollen Tongue Amoxicillin Newborn viagra Acheter Levitra 20mg Pharmacie Bentyl Saturday Delivery No Script Needed Store Cash Delivery Propecia Hort Auf Zu Wirken
Furosemide Over The Counter Substitute buy cialis Last Longer Naturally
Buy viagra prescription Cialis 20mg Testberichte

[HaroNism]

Priligy Official Site Acheter Du Baclofene viagra Zithromax Erythromycin Canada Viagra Online
Brescia Vendo Cialis Super Cialis On Line buy viagra Mysearchdial
Viagra Gocce Per Donne buy viagra online Cialis Prezzo Confezione Cialis 4 Comprimes

[HaroNism]

Priligy Nausea cialis Avodart Venta De Viagra En Barcelona
Rx Customer Care Cephalexin Side Effects Thirst China Priligy Alkohol viagra Cialis Per Quanto How Long Does Zithromax Last
Clomid Mois Ovulation cialis price Kamagra Pour Femme

[RonsisM]

Suprax canadian levitra Viagra Opiniones Viagra Without Perscriptions
Propecia Shed Hair Loss Tadalafil 20 Mg Sublingual buy viagra Buy Generic Effexor Online Viagrawithoutprescription.Us Over The Counter Cialis
Canine Use Of Amoxicillin Minipress Amoxicillin And Clavulanate Potassium Augmentin cialis Amoxicillin Doxycycline
Comprar Cytotec En Estados Unidos viagra Amoxicillin The Right Dose Isotretinoin Amnesteem Skin Health Medicine On Line Viagra Pas Marche