Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
strashilev
15.02.2021 13:55 •
Информатика
Вводится число (0конец ввода) определить сумму двухзнычных.
Показать ответ
Ответ:
Тролечка
01.09.2020 20:19
Var sum,n: integer;
begin
readln (n);
while n <> 0 do
begin
if (n > 9) and (n < 100) then sum := sum +n;
end;
writeln (sum);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
lerka22222222222222
03.11.2021 22:17
Утверждается, что массив A (m) целиком (как последовательность) встречается в массиве B (N), n m. Найти место массива A в массиве B или показать, что его в массиве B нету...
lisss2005
11.08.2021 10:40
Электрондық кестеде деректерді іздеу...
oksyunya
15.10.2022 22:01
Соревнования легкоатлетов Результаты соревнования по забегу на 100 ми прыжкам в длину даны в виде таблицы. Определите наилучшие результаты состязания по забегу на 100 ми прыж-...
jankirik
09.01.2022 07:44
Створити список з 10 випадкових елементів (від 10до 100) і надрукувати його...
Ангелочек319
25.01.2021 07:43
Дано Описание Массива :[1..18] ......
кпрооо
11.01.2023 07:38
Приложение, обрабатывающее информацию, которую можно представить в виде таблицы и автоматизировать обработку таких данных Word Power Point Excel Chrome...
bi2002
23.04.2021 05:52
Практическое занятие по информатике сделать Создайте таблицу с такими столбцами: Номер, Фамилия, Имя, отчество, Вычислительная техника, Физика, Математика, История, Иностранный...
seredinavi
08.06.2022 18:13
Первое племя имеет 16-ти символьный алфавит. второе племя использует 32-символьный алфавит. вожди племён обменялись письмами. письмо первого племени содержало 90 символов, а...
RAMINA1903
31.08.2021 18:55
1. в одной из кодировок unicode каждый символ кодируется 16 битами. определите размер следующего предложения в данной кодировке: я вас любил безмолвно, безнадежно, то робостью,...
gehdjtg
18.04.2022 11:52
Кожна правильна відповідь (1,5 б) 13. Поясніть, у чому, на думку Т. Г. Шевченка, виявляється справжній патріотизм?14. Визначте головну думку поезії Т. Г. Шевченка «Мені однаково,...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
readln (n);
while n <> 0 do
begin
if (n > 9) and (n < 100) then sum := sum +n;
end;
writeln (sum);
end.