Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Сашуньк
20.07.2021 20:17 •
Информатика
Найти сумму целых отрицательных нечетных чисел, больших -100 в паскале
Показать ответ
Ответ:
alinka660066
09.10.2020 18:44
var i,s:integer;
begin
for i:=1 to 99 do
begin
if i mod 2=1 then s+=i;
end;
s:=-1*s;
writeln(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
tanakovalizka1
03.05.2020 10:38
Какое наибольшее целое положительное число x, при котором ложно утверждение: (7x-3 75)→(x(x-1) 65)?...
ifj2ifvjw
03.05.2020 10:38
Какие вы знаете устройства хранения информации?...
Okladakey
03.05.2020 10:38
Со сканера было получено 24-х разрядное изображение размером 1024х768px. при обработке в графическом редакторе объем файла был уменьшен в 6 раз. найдите объем полученного...
Отличницааа5
03.05.2020 10:38
Сколько символов текста можно передать за 5 секунд,используя телефонный канал,работающий со скоростью 56 кбит/с...
Алина15989
03.05.2020 10:38
Опишите составляющие процесса решение : получение-прочитать (или выслушать) условие...
galin56owukth
26.11.2022 13:52
Які методи та функції використані у програмному коді та чому. a = 100 b = Строка a, b = b, a a Строка b 100...
ДаняВетренный
24.08.2022 13:58
Табулирование функции y=2x+3 на языке Паскаль (8класс)...
Пездюк1
27.02.2020 00:35
. В основу построения большинства компьютеров положены общие принципы, сформулированные американским ученым ( ). А. Алан Тьюринг; Б. Джоном фон Нейманом;В. Блез Паскаль;Г....
Саша15e
02.02.2023 07:28
Определить количество дней в году (Python) В обычном году 365 дней, а в високосном - 366. Каждый четвертый год является високосным, кроме столетий, которые не делятся...
superbogdanova
02.12.2020 19:31
Бит дегеніміз не айтыңдаршы...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var i,s:integer;
begin
for i:=1 to 99 do
begin
if i mod 2=1 then s+=i;
end;
s:=-1*s;
writeln(s);
end.