tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Найдите количество двузначных
Найдите количество двузначных чисел, которые делятся на сумму своих цифр.pascal abc
Alexy7406
2 15.06.2019 11:20
3
Ответы
Рома67463
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, вроде я не ошибся.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
anamakitriuk
05.03.2021 16:07
Укажите логический тип данных123-5678True 6 класс ...
danadv
24.10.2021 13:12
Для выполнения арифметических и логических операций данные выбираются из 1. КЭШ - памяти 2. Системного диска 3. Оперативной памяти 4. Гибкого магнитного диска 5. Регистра...
annaegorova4
24.10.2021 13:20
Что представляет Египетская с/с? Решить пример. 17*50, 18*60 8- с/с. Решить пример. Перевести 388 в 8- с/с и обратно....
Арти1234567890
24.10.2021 13:23
с заданием по информатике, заранее )))...
sweta2012
24.10.2021 13:28
2. Что такое сервис оператора сравнения?...
DIMAES0
04.07.2019 07:40
Много . паскаль. пользователь вводит с клавиатуры целое число а. если это число является четным, вывести на экран фразу вы ввели четное число , в другом случае вы ввели...
tenickiy176
23.04.2020 22:28
Написать программу, которая вводит натуральное число N и выводит первые N натуральных чисел. (РЕШИТЬ ЗАДАЧУ С ИСПОЛЬЗОВАНИЕ ПРЕДУСЛОВИЯ) ВОТ ТАКИМ Введите натуральное...
frolikoffgrigory
23.04.2020 22:26
Задание #43 Во Комплекс аппаратных и программных средств, по¬зволяющих компьютерам обмениваться данными Выберите один из 4 вариантов ответа: 1) интерфейс 2) компьютерная...
bolbatunovao
23.04.2020 22:28
Написать программу вычислениязначения выражения на языке Python и скриншот содерж. исходные данные и полученные результаты.1.Гектары в квадратные метры.2.Сколько секунд...
Biglok
23.04.2020 22:28
После выполнения данной сортировки в ячейке 2 находится слово : 1) шкафы 2) стулья 3) люстры 4) мебель для ванной 5) тумбочки...
Популярные вопросы
2. На рисунке показана программа поворота робота на 3 по часовой стрелке....
3
5. ответьте ДА или НЕТ Афины Аттика славилась оливковыми деревьями....
2
Мәтіндегі 5 хабарлы сөйлемді сұраулы сөйлемге айналдырыңдар. Жасалу...
3
Задание 2 Проанализируйте отрывок из произведения М. Зощенко «Аристократка»....
1
Климатические условия в разных частях бразилии...
3
Пользуясь картой Количестваосадков, выявите особенности ихраспределения...
2
Прочитай и определи что говорится...
3
в треугольнике ABC, угол А равен 40 градусов, АС равен 60 градусов,...
2
.Какова сила взаимодействия между астронавтом и месяцем? Если масса...
1
Написать программу, которая вводит массив из N целых чисел и выводит...
2
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, вроде я не ошибся.