Напишите перевод программы Program mas_3 ; var s, i: integer; a: array[1..10] of integer; begin randomize; for i:=1 to 10 do a[i]:=random(100); for i:=1 to 10 do write (a[i], ' '); s:=0; for i:=1 to 10 do if (a[i]>10) and (a[i]<30) then s:=s+a[i]; write('s=', s) end.

что понимать под "переводом программы"

Объяснение:

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. // конец программы