1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 | dim a(2,2)for i=1 to 2for j=1 to 2input "vvedite element ",a(i,j)nextnextprint "ishodnyj massiv"for i=1 to 2for j=1 to 2print a(i,j);nextprintnextprintfor i=1 to 2a(i,2)=a(i,2)*2nextprint "novyj massiv"for i=1 to 2for j=1 to 2print a(i,j);nextprintnext |
Тестирование выполнено в программе QB64 ( Скачать )