• 
  • 11 January 2021
  Информатика
  • Автор: кококококококококок1

  

  Дан массив. Все элементы меньше 10 умножить на 100.
  
  Пожааааалуйста, памагити
  (Это в паскали)
  
  Дам 30 балов

• 
  • 11 January 2021
  • Ответ оставил: 13nisa13

  const n=10;

  var a: array[1..n] of integer;

  i,s:integer;

  begin

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

  for i:=1 to n do

  begin

  a[i]:=random(21)-10;

  write(a[i]:5,' ');

  if a[i]<10 then a[i]:=a[i]*100

  end;

  writeln;

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

  for i:=1 to n do write(a[i]:5,' ')

  end.

  0
• 
  • НЕ НАШЛИ ОТВЕТ?

  Если вас не устраивает ответ или его нет, то попробуйте воспользоваться поиском на сайте и найти похожие ответы по предмету школьной программы: информатика.
  На сегодняшний день (22.11.2024) наш сайт содержит 16354 вопросов, по теме: информатика. Возможно среди них вы найдете подходящий ответ на свой вопрос.

  Найти другие ответы
• Нажимая на кнопку "Ответить на вопрос", я даю согласие на обработку персональных данных

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

Последние опубликованные вопросы