Регистрация
Арина7405
22.11.2021 16:16
Информатика
Есть ответ 👍

Программа windows movie maker 2.6 скачана , установлена . но не открывается сама программа . я нажимаю , а она не включается .

105
308
Посмотреть ответы 1

Ответы на вопрос:

OxanchikG
OxanchikG
4,7(51 оценок)
Полагаю, pascal abc. //для pascal abc.net: var a: array[1..10] of longint; n,i,k: longint; begin readln(n); //читаем количество элементов в массиве for i: =1 to n do begin read(a[i]); //читаем каждый элемент в массиве if (a[i]< 0) then k+=1; //увеличиваем счётчик k на 1, если элемент меньше нуля end; writeln(k); //выводим счётчик k end. //для pascal abc: var a: array[1..10] of integer; n,i,k: integer; //простой паскаль не поддерживает longint begin readln(n);   for i: =1 to n do begin read(a[i]);   if (a[i]< 0) then k: =k+1; //отличие в том, что здесь нельзя просто увеличить с +=, только с : =k+1 end; writeln(k); //выводим счётчик k end.

Популярно: Информатика