Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
EvaPark2013
11.06.2020 07:44 •
Информатика
Найдите разность чисел от -5 до 28(паскаль)
Ответ:
Artem517Art
04.10.2020 05:39
Var
i, s: integer;
begin
s := 0;
for i := -5 to 28 do
s := s - i;
writeln(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Роднойязык11
10.08.2022 16:32
Осуществить ввод целых чисел (ввод осуществляется до тех пор,пока не будет введён 0) и подсчитать их сумму и среднее арифметическое введённых положительных чисел. использовать...
DjRio
10.08.2022 16:32
Сложить числа а) 10000011(2)+1000011(2); б) 1010010000(2)+1101111011(2); в) 110010,101(2)+1011010011,01(2); г) 356,5(8)+1757,04(8); д) 293,8(16)+3cc,98(16)....
Назар233
10.08.2022 16:32
Ваквариуме плавала рыбка, каждый день число рыбок удваивали. сколько рыбок стало в аквариуме к 8 дню? ?...
rfrfrfrfe
09.12.2022 01:29
С табло, состоящего из 5-ти цветных лампочек, передаётся информация. Сколько различных сигналов можно передать с такого табло, если использовать лампочки двух цветов ?...
Танюшка364
16.11.2021 10:33
У кого хорошо развит головной мозг ? парнокапытные , хищные ,приматы...
ИЩЕ6
11.02.2020 12:19
Цикл в фрагменте программы р:=2; repeat р:=р+2 until p 11; будет исполнен: а) бесконечное число раз б) 2 раза в) 0 раз г) 1 раз...
Den2891
03.05.2020 16:37
Расчитайте объем памяти, необходимый для представления одноминутного фильма на экране монитора с разрешением 800*600 пикселей и политрой из 65536 цветов, если за 1 секунду...
Дима22222222
05.09.2020 17:58
Напишите наименьшее натуральное двухзначное целое число, для которого истинно высказывание НЕ(первая цифра нечётная) И (число делится на 3)...
Fernier
14.02.2020 13:58
Чем проект полезен и чему учится ученик ...
lavira3
13.08.2021 23:38
написать программу в питонедано предложение: Я хочу получить пятёрку. узнать его стоимость, если 1 символ стоит 10 копеек...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
i, s: integer;
begin
s := 0;
for i := -5 to 28 do
s := s - i;
writeln(s);
end.