Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
FinPinKin
28.03.2023 17:52 •
Информатика
Вычислить сумму всех четных натуральных чисел меньше данного n . сумму всех четных натуральных чисел меньше данного n . по информатике
Показать ответ
Ответ:
anosovadara
19.06.2020 10:28
Var a,n,s:integer;
begin
write('введите число n ');
readln(n);
s:=0;
for a:=1 to n do
if (a<n) and (a mod 2 =0) then s:=s+a;
write(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Havedid
11.05.2023 20:29
Дан массив а из 20 элементов. найти сумму первых 10 элементов массива и следующих 10 элементов массива. результат вывести на печать....
albgon4arowa20
04.03.2021 17:48
С++ дана величина А выражающая объем информации в байтах перевести А в более крупные единицы измерения Мегабайт Гигабайт на c++...
ypinkers0
15.03.2021 19:12
Умножьте данные числа в 2-чной системе счисления: 110110110*101=???...
ник4760
18.02.2021 01:30
ИНФОРМАТИКУ 8 КЛАСС РЕШИТЬ.ОЧЕНЬ НАДО. 9 И 10 НОМЕРА...
rope22
05.07.2022 21:58
Какие названия для смены слайдов есть в программе LibreOffice Impress? Часовая стрелка Жалюзи Гребёнка Плитки Радуга Интерьер Можно выбрать несколько вариантов...
VeshkinRuslan
17.02.2021 09:06
Домашнее задание: Напиши короткое эссе на тему «Как цифровые технологии влияютна жизнедеятельность человека?». позязя...
anyayakubchick
20.01.2021 06:40
Решить . в турнире по настольному теннису по одному ученику из 6 а, 6 б и 6 в классов. это были саша, иван и дима. первыми играли саша и ученик 6 а класса. после них взяли...
Stasichek1
19.12.2020 06:27
1)какая предпринимательская деятельность связана с рыночной 2) почему и от кого надо защищать конкуренцию...
maks2324
19.12.2020 06:27
Периметр ромба 8 см, а длина перпендикуляра, опущенного из вершины тупого угла на противоположную сторону, равна 1 см. вычислить углы ромба....
gerl1999
19.12.2020 06:27
Вниже предложениях из прочитанного текста пронумерованы все запятые. выпишите цифру (-ы), обозначающую (-ие) в сложном предложении запятую(-ые) между частями, связанными...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
write('введите число n ');
readln(n);
s:=0;
for a:=1 to n do
if (a<n) and (a mod 2 =0) then s:=s+a;
write(s);
end.