Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
onlysvp
23.11.2021 13:32 •
Информатика
Дан массив целых чисел a[1..8]. найти количество отрицательных элементов массива. (без структуры "inc").
Показать ответ
Ответ:
Iraeuroset3
27.09.2020 22:50
1 c:=0
for i:=1 to 8 do begin
if a [i]<0 then inc (c);
end;
writeln (c);
2 c:=0
for i:=1 to 8 do begin
c=c+i×i;
end;
writeln (c);
0,0
(0 оценок)
Популярные вопросы: Информатика
jintonik2
02.03.2021 02:51
разобраться если надо вопрос скажу в комментариях...
Anonimshik33
08.04.2023 02:15
На одной странице электронного текста содержится 32 строки по 32 символа в каждой строке. Код одного символа имеет длину 16 бит. Сколько килобайт информации содержит страница текста?...
Yurianvinokurov
10.03.2023 08:06
Який рядок S буде сформовано у результаті виконання фрагмента програми? For i := 0 to 1 do For j := 0 to 1 do S:= S+ IntToStr (i) + IntToStr (j) ;...
bayawb65
26.04.2023 14:42
25 б!! придумай цепочку преобразования произвольного 3х значного числа, приводящего к такому же результату (7 пунктов минимум)...
ayala041
15.04.2023 19:58
Python Напишите программу, которая в аргументы принимает три натуральных числа x, y, z. Определите, существует ли треугольник с такими сторонами. надо использовать функцию defЕсли...
Iliyz
04.06.2021 02:40
Из какого произведения эти выражения задал такого стрекача...
yarikplay13
04.06.2021 02:40
Підібрати 5 фразеологізмів до слова близько...
IvanPAW2145778
04.06.2021 02:40
Кто из сказочных героев дал объявление такое объявление,,охранному агентству на постоянною работу требуется 33 сотрудника крепкого телосложения...
Dinara55
04.06.2021 02:40
2кг жареного кофе получается из 3 кг сырья. сколько жареного кофе получится из 12 кг сырья? с объяснением)...
repoli433
04.06.2021 02:40
Написать реальность и фантастические эпизоды в повести н.в гоголя заколдованное место...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
for i:=1 to 8 do begin
if a [i]<0 then inc (c);
end;
writeln (c);
2 c:=0
for i:=1 to 8 do begin
c=c+i×i;
end;
writeln (c);