Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Nerror
09.08.2020 12:39 •
Информатика
Найдите количество двузначных чисел, которые делятся на сумму своих цифр.pascal abc
Показать ответ
Ответ:
Алалутала
12.07.2020 16:16
Чувак, я не знаю паскаля, в коде могут быть ошибки синтакисиса. По сути так:
begin
var count : integer;
for var i := 10 to 99 do
if i mod (i mod 10 + i div 10) < 1 then count := count + 1;
end;
Это PascalABC.Net, вроде я не ошибся.
0,0
(0 оценок)
Популярные вопросы: Информатика
max4bob
29.01.2023 20:02
Ис таблиц истинности докажите правильность молю умоляю...
ochensad
16.09.2022 18:23
Книга содержит 207 страниц на каждой странице 45 строк в каждой строке 63 символа какой объем информации в книге в байтах и килобайтах? ...
курррва228
16.12.2020 09:04
Что делать если программа (cryengine 3 free sdk) пишет что не видит файл libfitt64.dll...
Wertwer123
20.07.2021 08:09
Решить через pascal 1. к финалу конкурса лучшего по профессии специалист электродорожник были допущены трое: иванов, петров, сидоров. соревнования проходили в 3 тура. иванов...
DEKTG
08.06.2022 01:44
Сформировать одномерный массив из 9 чисел элементы которого...
Викатульская
26.02.2022 12:33
Обчислить значение f за формулой f=a-b²/ac-bзаписать в паскале,!...
DesertTwo1
17.04.2021 03:52
Инфа я не шарю в этой теме. фото прилагается. на завтра....
dimabeliu2016
27.12.2021 02:32
Яким буде рузультат виконання даної програми якщо натиснуто клавішу пропуск на клавіатурі?...
arasukirina6
25.04.2023 13:32
2,2 , нужна для решения данного по информатике...
Вуди228
13.05.2023 17:31
Паскаль! кольцо задано своим внешним и внутренним радиусами. вычислить площадь кольца с использованием подпрограммы нахождения площади круга известного радиуса. + нужна блок-схема!...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
var count : integer;
for var i := 10 to 99 do
if i mod (i mod 10 + i div 10) < 1 then count := count + 1;
end;
Это PascalABC.Net, вроде я не ошибся.