Vrpeshka
?>

Выберите правильную запись арифметического выражения (2*17.56*17.56)/(7*2.47*0.43)​

Информатика

Ответы

VladimirovnaViktorovich

program study235;

const n = 3;

         m = 6;

type mas = array [1..n, 1..m] of integer;

var a: mas;

     i, j, temp: Integer;

begin

writeln('Дан целочисленный двумерный массив, размерности n × m, при n = 3 m = 6. Поменять местами первый и последний элемент.');

writeln;

randomize;

writeln('Исходный массив:');

for i := 1 to n do

 for j := 1 to m do

 begin

 a[i, j] := random(201);

 write(a[i, j], '; ');

 if (j = 6) then writeln;

 end;

temp := a[1, 1];

a[1, 1] := a[3, 6];

a[3, 6] := temp;

writeln;

writeln('Преобразованный массив:');

for i := 1 to n do

 for j := 1 to m do

 begin

  write(a[i, j], '; ');

  if (j = 6) then writeln;

 end;

readln;

end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Выберите правильную запись арифметического выражения (2*17.56*17.56)/(7*2.47*0.43)​
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

sanyaborisov910067
gullieta
peresvetoff100015
Elshel8694
ilplakhotin8734
Михайлов
kmalahov
magazintrofey
valerii_Georgievna915
kuchino09
dashakhmeleva6
stasyan
treneva359
Егорова
iivanov54