Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
esmeraldadoctor
30.07.2020 13:46 •
Информатика
Составить программу нахожденмя суммы четных чискл на промкжутке от 26 до 88 (с предусловием)
Показать ответ
Ответ:
диля1234567асем
08.10.2020 17:03
Var a,s:integer;
begin
a:=26;
while a<=88 do
begin
if a mod 2 = 0 then s:=s+a;
a:=a+1
end;
writeln (s)
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
fvbh3fvhc
01.09.2020 10:22
сделать задачу в excel В некотором году (условно первом) на участке в 100 гектар средняя урожайность ячменя составила 20 центнеров с гектара. После этого каждый год площадь...
znania53
27.06.2021 13:52
Запишите число 1997,7991 пятью различными в формате с плавающей точки Запишите числа в формате с палавающей точкой и нормализованной матиссой 217,934 10,75321,10,0101 10,200450...
AlexandraBarabash
11.12.2022 08:21
Дан код с номером. Определи, какой это символ: управляющий или изображаемый. Код с номером 58. ???изображаемый ???управляющий...
nik896
06.03.2023 08:30
Написать программы с циклами: 1. Вводится натуральное число. Найти сумму цифр, кратных шести, входящих в его состав. 2. Составить таблицу значений функции y = 3 - x2/2 на...
шкальник2281337
11.02.2023 04:46
Выразите в килобайтах объем текстовой информации в Современном словаре иностранных слов из 740 страниц, если на одной странице размещается в среднем 60 строк по 80 символов....
dasha1957
08.02.2022 03:42
Среди приведённых ниже трёх чисел, записанных в различных системах счисления, найдите наибольшее и запишите его в десятичной системе счисления. Перевод чисел записать в...
kuzyaevkuzyaev2
08.02.2022 03:42
на до очень если сделайте поставлю лучший...
vikasaaan
11.12.2020 07:03
Процесс выполнения операторов присваивания:a:=2;m:=101;z:=a∗mПри выполнении оператора a:=2 в ячейку оперативной памяти компьютера с именем a заносится значение ; при выполнении...
Cunctator
17.05.2020 01:42
Что такое сноска быстро...
vasyav1337
12.11.2022 14:56
Как мы можем убедиться что наша игра работает?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
a:=26;
while a<=88 do
begin
if a mod 2 = 0 then s:=s+a;
a:=a+1
end;
writeln (s)
end.