дано n чисел .вычислите сумму квадратов отрицательных чисел

Дано n чисел .вычислите сумму квадратов отрицательных чисел

Задать свой вопрос
Вячеслав Асаба
Каким образом вводим числа?Сначала вводим N?
2 ответа
n = int(input())
s = 0
for i in range(n):
 m = int(input())
 if mlt;0: s+=m**2
print(s)
Pascal ABC.

var   
    i,n,sum,a:integer;
begin     
    readln(n);     
    for i:=1 to n do     
    begin         
        readln(a);         
        if alt;0 then sum:=sum+sqr(a);     
    end;     
    writeln(sum);
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт