Объясните,что делает эта программа (m=3,n=5) FreeBasic

cls

input m

input n

dim a(m,n),b(n)

for i=1 to m

for j=1 to n

a(i,j)=(i+2*j) mod 7

next j

next i

for i=1 to n

b(i)=a(1,i)+a(m,i)

if int(b(i)/3)=b(i)/3 then

for j=1 to m

print a(j,i);

next j

print

end if

next i

sleep

end

В ответе выходит: 2 3 4
Please enter comments
Please enter your name.
Please enter the correct email address.
You must agree before submitting.

Answers & Comments


Copyright © 2025 SCHOLAR.TIPS - All rights reserved.