;uses crt

var

 ; m1,m2,m3:array[1..100,1..100] of integer

  ;i,j,k,m,n,g,f,o:integer

begin

  ;clrscr

  ;(‘writeln ('insert degrees of m1 and m2

  ;(readln (m,n

  ;(gotoxy (35,2

  ;(readln (f

  ;(gotoxy (35,3

  ;(readln (o

  if f<>n then

    ;(‘writeln('pygame khata

  if f=n  then

    begin

      for i:=1 to m do

        for j:=1 to n do

          begin

            ;(gotoxy (5*j,i*2+5

            ;([readln (m1[i,j

          ;end

      for i:=1 to f do

        for j:=1 to o do

          begin

            ;(gotoxy (5*j+25,2*i+5

            ;([readln (m2[i,j

          ;end

      for i:= 1 to m do

        for j:=1 to n do

          for  k:=1 to o do

            ;[m3[i,k]:=m1[i,j]*m2[j,k]+m3[i,k

      for i:=1 to m do

        for j:=1 to o do

          begin

            ;(gotoxy (5*j+50,2*i+5

            ;([write (m3[i,j

          ;end

    ;end

  ;readln

.end

نظرات شما عزیزان:

نام :

آدرس ایمیل:

وب سایت/بلاگ :

متن پیام:

نظر خصوصی

 کد را وارد نمایید:

 

 

 

عکس شما

آپلود عکس دلخواه: