Programlama | Programlama Dilleri | C Programlama Dili |C++

Hata
  • XML Parsing Error at 1:82. Error 9: Invalid character


Matristeki En Küçük Say?y? Bulma ve Matrisi Say?yla Çarpma

Pascal programlama dilinde yaz?lm?? bu programda 6x6 boyutlar?ndaki bir matrisin en küçük say?s?n? bularak, tablodaki bütün elemanlar?n bu say?yla çarp?m?ndan olu?an yeni bir 6x6 boyutlar?nda matris olu?turacak alt program icra edilmi?tir.


  1.  
  2.  
  3.  
  4. uses crt;
  5. var
  6. tablo:array[1..6,1..6] of integer;
  7.  
  8. i,j,min:integer;
  9.  
  10. procedure mincarp;
  11. begin
  12. min:=tablo[1,1];
  13. for i:=1 to 6 do
  14. for j:=1 to 6 do
  15.   if min > tablo[i,j] then min:=tablo[i,j];
  16.  
  17. for i:=1 to 6 do
  18.  for j:=1 to 6 do
  19.   tablo[i,j]:=tablo[i,j]*min;
  20.  
  21.  
  22. begin
  23. clrscr;
  24. writeln('Tablo degerlerini giriniz...');
  25. for i:=1 to 6 do
  26.  for j:=1 to 6 do
  27.   read(tablo[i,j]);
  28.  
  29. readln;
  30. mincarp;
  31. writeln('');
  32.  
  33. for i:=1 to 6 do
  34. begin
  35.  for j:=1 to 6 do
  36.  write(tablo[i,j]);
  37. writeln('');
  38.  
  39. readln;
  40.        
  41.  
  42.  

Yorumlar (0)
Sadece kayıtlı kullanıcılar yorum yazabilir!
 
404 Not Found

404

Not Found

The resource requested could not be found on this server!


Proudly powered by LiteSpeed Web Server

Please be advised that LiteSpeed Technologies Inc. is not a web hosting company and, as such, has no control over content found on this site.