Prostofil200790
?>

Определите значение переменных s и i после выполнения следующих операторов.

Информатика

Ответы

mos-5nica

Незнаю ответ непонятно нечево

Станиславович1830
PROGRAM A24;
const
    max = 20;
    
var
    c:array[1..max]of integer;
    x:integer;
    i, k:byte;

BEGIN
  writeln('Заменить k-й элемент одномерного массива на 0, если этот элемент четный и на 1 если он нечетный');
  writeln(' ');

  writeln('Начальный Массив' );
  randomize;
  for i:=1 to max do begin
    c[i]:=random(-64,64);
    write(c[i], ' ');
  end;

  writeln(' ');
  writeln(' ');
 
  write('Введите k='); readln(k);
  writeln(' ');

  if odd(k) then
      c[k]:=1
  else
      c[k]:=0;

  writeln(' ');    
  writeln('Измененный массив' );  
  for i:=1 to max do
    write(c[i], ' ');
END.

Написать программу на паскале 20) заменить k-й элемент одномерного массива на 0, если этот элемент ч
elenaneretina
Ну по сути нужно выписать в порядке возрастания, либо в порядке убывания, соответственно они должны быть пронумерованы, задание вы дали не полностью, так что придется догадываться...

1 чемпионы & плавание
2 чемпионы | (бег & плавание)
3 чемпионы | бег | плавание
4 чемпионы & Европа & бег & плавание

если в порядке возрастания, то в ответ пишите так...
   
4123

если в порядке убывания, то в ответ пишите так...

3214

не особо уверен что нужно сделать именно это, т.к задание вы полностью не предоставили, но если задание такое, то должно быть правильно

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

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

Определите значение переменных s и i после выполнения следующих операторов.
Ваше имя (никнейм)*
Email*
Комментарий*

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

sbraginets
Ivan500
frsergeysavenok
FinKozhevnikov28
gladkihvv
Роман1406
Татьяна_Вологжин
clubgarag701
natalyaionova
Середа-Сергеенков980
3. Установите соответствие
sdvigov
olesyashazk5055
o-lala88387
Latsukirina
спец387