Организуйте массив.Поменяйте на дисплей значения и индексы элементов,модуль значения которых меньше 10. КАК ОПИСАТЬ СЛЕДУЮЩИЕ ЭТАПЫ ПО ЭТОЙ ЗАДАЧИ:-физическая постановка задачи,математическое описание,разработка алгоритма решения заачи,программирование,описание отладки программы на ПК

1

Ответы и объяснения

  • Участник Знаний
2014-04-05T11:44:49+04:00
Описать этапы не умею. Могу составить только программу

var
  a: array[1..10]of integer;
  i: integer;
begin
writeln('Массив: '); 
for i := 1 to 10 do
  begin
  a[i] := random(50, -50);
  write(a[i]:4)
  end;
writeln;
writeln('Элементы с модулем значения меньше 10:'); 
for i := 1 to 10 do
    if abs(a[i]) < 10  then writeln('индекс: ', i, ', значение: ', a[i])
end.