Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
igubaevak
12.10.2022 06:53 •
Информатика
Составить програму вычесления самы четных чисел в диопазоне от 1 до 100
Показать ответ
Ответ:
olegstar74p0a994
20.08.2020 22:59
В паскале
LG i,s:integer;
begin
s:=0;
for i:=1 to 100 do
if i mod 2 = 0 then s:=s+i;
writeln(s);
END.
0,0
(0 оценок)
Популярные вопросы: Информатика
kucherenkolshaLexa
26.12.2020 02:58
Даны стороны треугольника.Определить вид треугольника: равносторонний, равнобедренный, иначе вывести нет...
pra02
06.08.2021 05:22
В списке приведены характеристики устройств, относящихся к системе персонального компьютера. Выберите характеристику монитора. 1) частота вращения 7200 об/мин 2) тактовая частота...
Аида1611
14.06.2020 20:46
Phyton Даша и Маша играют в настольную игру. Чтобы сделать очередной ход игроку нужно бросить обыкновенный игральный кубик, который покажет, сколько шагов вперёд можно сделать....
sooova123
27.04.2020 22:37
Инскепт . Компьютерная графика по-человечески . Можете это нарисовать в инкейпте . Цветовую гамму скину...
tyon
29.03.2023 20:24
Создавайте файл lesson4.htnal. Отфарматируйте предложенный фрагмент текста в соответствие с образом (применяя нумерованный список)...
Daya98888888
24.05.2023 18:34
Напишите программу на Python Найди самого большого. Пользователь вводит последовательность целых чисел (каждое число на новой строке). Если пользователь вводит 0, то последовательность...
Ник111111н
10.04.2022 11:58
В таблице приведены за и количество страниц, которые нашел поисковый сервер по этим за в некотором сегменте Интернета: За Количество страниц (тыс.) Байкал 450 Селигер 350 Таймыр...
Chokoladik
22.06.2021 01:21
Что выведет программа, если в качестве значений переменных s и t вводились (11,12)? var s, t: integer; begin readln(s); readln(t); if (s 10) and not (t 10) then writeln(s)...
suxova1985251030
14.10.2021 12:31
Вариант 12в пещере у реки поселился огнедышащий дракон. Всех, кто пытался егопрогнать, он прогонял сам, полыхая на них огнем. Количество полыханиизависело от того, на кого...
Dragnil29
25.02.2020 06:24
Составьте блок-схему и программу вычисления значения функции (Paskal):...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
LG i,s:integer;
begin
s:=0;
for i:=1 to 100 do
if i mod 2 = 0 then s:=s+i;
writeln(s);
END.