что понимать под "переводом программы"
Объяснение:
Program mas_3 ; // название программы mas_3
var s, i: integer; // объявление целочисленных переменных s и i
a: array[1..10] of integer; // объявление целочисленного одномерного массива a размером 10
begin // начало программы
randomize; // инициализация генератора случайных чисел
for i:=1 to 10 do a[i]:=random(100); // заполнение массива a случайными числами в диапазоне от 0 до 99
for i:=1 to 10 do write (a[i],' '); // вывод на экран элементов массива через пробел
s:=0; // присвоение переменной s значения 0
for i:=1 to 10 do // цикл для переменной i от 1 до 10
if (a[i]>10) and (a[i]<30) then s:=s+a[i]; // если значение элемента массива a больше 10 и меньше 30, то к переменной s прибавляем это значение
write('s=', s) // вывод на экран значения s
end. // конец программы
я уже ответил в других вопросах
ой не туда простиии я не чайно я тебя обидел прости про меня