Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Sofi432432
27.12.2021 08:41 •
Информатика
Дан одномерный массив. найти сумму отрицательных элементов, стоящих на четных местах. хелп, , ))
Показать ответ
Ответ:
Пупс2014
02.07.2020 10:57
Program qq;
var a:array of [1..длина массива] of real;
i:integer;
summ:real;
begin
summ:=0;
for i:=1 to длина массива do read(a[i]);
for i:=1 to длина массива do
if (i mod 2 = 0) and (a[i]<0) then summ:=summ+a[i];
writeln(summ);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
stich3918
21.06.2021 18:41
за 15 секунд по каналу связи передаёт 750 байтов информации чему равна пропускная канала...
мария2388
08.02.2023 18:25
Ребят решить 2 подгруппу...
ник030303
31.12.2022 09:45
На олимпиаде по информатике участвовало пятеро учеников: вася (в), гриша (г), иван (и), саша (с), юра (ю).об итогах олимпиады имеется пять высказываний: 1.выиграл вася, а юра на...
coast31g2005
05.09.2022 01:54
Бывает, что пылкий мальчишка За гостем приезжим по следу В дорогу торопится слишком: - Я тоже отсюда уеду! Вид рифмы...
Шенявка
05.09.2022 01:54
Плоскогубцы образуют два одинаковых соединённых рычага. Плечо рычага в 8 раз длиннее плеча . С какой силой плоскогубцы сжимают мячик, если сила , приложенная к рукояткам, равна...
Antik3006
05.09.2022 01:54
Город, расположенный на границе Европы и Азии....
irinamazda
13.02.2022 06:53
Сколько цветов ( N ) насчитывается в палитре, если глубина цвета ( i ) равна 3 ?...
temnikovay01
20.07.2022 01:42
Какое будет потомство от скрещивания кроликов живой массой 1500 г с кроликами массой 5100 г? Какой размах признака можно ожидать в F2 от скрещивания этих форм, если известно, что...
sqdanf1eld
05.09.2022 01:54
В каком времени происходит действие в стихотворении О как безумно за окном...
vladimirrr74
09.04.2022 06:03
буду благодарна 3,4 задания...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a:array of [1..длина массива] of real;
i:integer;
summ:real;
begin
summ:=0;
for i:=1 to длина массива do read(a[i]);
for i:=1 to длина массива do
if (i mod 2 = 0) and (a[i]<0) then summ:=summ+a[i];
writeln(summ);
end.