1. → 2 [сдвинуться вправо, перейти на строку 2]
2. → 3 [сдвинуться вправо, перейти на строку 3] — в вопросе опечатка?
3. → 4 [сдвинуться вправо, перейти на строку 4]
4. ? 5;2 [если в текущей ячейке нет метки, перейти на строку 5, иначе вернуться на 2]
5. ← 6 [сдвинуться влево, перейти на строку 6]
6. V 7 [поставить метку, перейти на строку 7]
7. ! [закончить работу]
Программа делает следующее: переходит на метку вправо, шагами по две ячейки идёт вправо, пока не дойдёт до пустой ячейки, возвращается на ячейку влево, ставит там метку и заканчивает работу.
Пусть метки расположены в ячейках 0 - (n-1), каретка под ячейкой 0.
Тогда сначала каретка окажется подячейкой 1, сделает [n/2] шагов по 2 вправо ([x] — целая часть x), оказавшись под ячейкой 1 + 2 * [n/2], вернётся на ячейку влево (ячейка 2 * [n/2]) и поставит там метку.
Если n было четным, будут заполнены ячейки от 0 до n, каретка под ячейкой n
Если n было нечетным, будут заполнены ячейки от 0 до n - 1, каретка под ячейкой n - 1
=D$2+$B4...........................................
Верные имена файлов: б) и г).
№3
program fofgogjoj;
var
a,b,c,S,P:real;
begin
Writeln('Введите длину катета a');
Readln(a);
Writeln('Введите длину катета b');
Readln(b);
c:=sqrt(a*a+b*b);
P:=a+b+c;
S:=(1/2)*a*b;
Writeln('P=', P:0:2);
Writeln('S=', S:0:2);
end.
Static void Main(string[] args)
{
int count = 0;
Console.Write("Введите размерность массива: ");
int n = Convert.ToInt32(Console.ReadLine());
int[] mas = new int[n];
Console.WriteLine("Заполните массив: ");
for (int i = 0; i < n; i++)
{
Console.Write("\t{0} элемент массива: ", i + 1);
mas[i] = Convert.ToInt32(Console.ReadLine());
}
for (int i = 0; i < n; i++)
if (mas[i] > 0 && mas[i] \% 2 == 0)
count++;
Console.WriteLine("Из {0} элементов массива {1} элементов являются положительными четными",n,count);
Console.WriteLine("{0}\% элементов являются положительными четными", (double)count/n*100);
Console.ReadLine();
}