В какой строке данного алгоритма допущена ошибка? (в ответе укажите номер строки) Новая программа* - Кумир
Программа Редактирование Вставка
Выполнение
Окна Практикум Робот Чертежник Инфо
10
использовать Чертежник
алг домик
Нач
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
сместиться в точку (1,3)
опустить перо
сместиться на вектор (2.5,3)
сместиться на вектор (2.5,-3)
сместиться в точку (1,3)
сместиться на вектор (1,0)
сместиться на вектор (5, -2)
сместиться на вектор (3,0)
сместиться на вектор (0,2)
о
КОН​

#include <iostream>
#include <cmath>
using namespace std;
int main()
{
    setlocale(LC_ALL, "Russian");
    double x,y,z;
    cout << "Введите 3 числа через пробел: ";
    cin >> x >> y >> z;
    if (x<0)
    {
       x=pow(x,2);
    }
    else if (x>0)
    {
        x=pow(x,3);
    }
    if (y<0)
    {
       y=pow(y,2);
    }
    else if (y>0)
    {
        y=pow(y,3);
    }
    if (z<0)
    {
       z=pow(z,2);
    }
    else if (z>0)
    {
        z=pow(z,3);
    }
    cout << "Вывод: " << x << " " << y << " " << z << endl;
    return 0;
}

Четное число делится на два, а кратное пяти делится на пять, поэтому число должно делиться без остатка на 2х5=10

// PascalABC.NET 3.0,сборка 1076
begin
  var n:=ReadInteger('Длина последовательности: ');
  var a:=ArrRandom(n,-50,50);
  Writeln('Исходная последовательность');
  a.Println;
  Writeln('Сумма элементов: ',a.Sum);
  Write('Кол-во четных, кратных пяти: ');
  Writeln(a.Where(x-> x mod 10 = 0).Count)
end.

Тестовое решение:
Длина последовательности: 20
Исходная последовательность
-4 21 -21 -23 14 -39 -12 1 -7 4 17 -45 30 -48 -19 -12 27 -46 -37 15
Сумма элементов: -184
Кол-во четных, кратных пяти: 1