Одномерный массив из 10 элементов с номерами от 10 до 20 заполнить случайным образом числами от 0 до 22. Все элементы массива,значения которых лежат между 10 и 20 включительно,увеличить в 5 раз.Вывести на экран монитора первоначальный и преобразованный массивы в столбик.

мамочкииии,как же ты меня спасаешь,дай Бог тебе здоровья :з

Спасибо, не помешает)

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

большое тебе спасибо

var   i:integer;  a:array[10..20]of integer;beginwriteln('Исходный массив:');for i:=10 to 20 do  begin  a[i]:=random(23);  writeln(a[i]);  end;for i:=10 to 20 do  if (a[i]>=10) and (a[i]<=20) then a[i]:=a[i]*5;writeln('Преобразованный массив:');  for i:=10 to 20 do  writeln(a[i]);end.