tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Среди двузначных чисел
Среди двузначных чисел найти те, сумма цифр которых равна 10 (pascal).
veronichkasape
3 31.08.2019 15:30
2
Ответы
87780583887
06.10.2020 08:01
Program;
var a,i:integer;
Begin
for i:=10 to 99 do
read(a);
if (a mod 10+ a div 10=10) then
write(a);
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
vikarubachok
22.11.2020 15:17
Как называются принтеры, в которых используется чернильная печатающая головка, выбрасывающая под давлением чернила из ряда мельчайших отверстий на бумагу? ...
guast1
21.05.2019 20:36
Кто шарит по паскаль абс. дано масив а[1..n]. знайти кількість елементів, що входять до цього масиву більш як один раз....
05NARIMAN05
12.10.2020 04:24
Адам тактильді ақпаратты ненің көмегімен алады...
vika2082
30.04.2021 01:05
Взаимодействие работников и разработчика...
andry92526
30.04.2021 01:07
В первый день спортсмен пробежал х километров, а затем он каждый день увеличивал пробег на 10% от предыдущего значения. по данному числу у определите номер дня, на...
olyakak00Fokcu
17.04.2019 06:20
Лабораторная работа Получение изображения при линзы Цель работы: научиться получать изображения при...
Еккуш63шшк83оагш7гв
17.04.2019 06:20
Лабораторная работа Измерение сопротивления проводника при амперметра и вольтметра Цель работы научиться измерять...
Annna987
17.04.2019 06:20
Цель работы определить ускорение движения шарика и его мгновенную скорость перед ударом о цилиндр. Оборудование желоб лабораторный...
ndzandigiv
17.04.2019 06:20
Лабораторная работа Исследование равноускоренного движения без начальной скорости (работа представлена в трех вариантах выполнения...
lexa3678
17.04.2019 06:20
Экспериментальное задание Изменение КПД электродвигателя Цель работы: оценить эффективность преобразования электродвигателем электрической...
Популярные вопросы
Послідовність дій. У пробірку внесіть 3-4 краплі розчину натрій...
1
3. Прочитайте первое предложение. Ясен ли вам его смысл? Восстанови-...
3
Сколько существует различных путей из города А в город Ж...
2
5. Період, коливань маятника 04с. Скільки коливань він зробить...
1
Какое наибольшее количество дней можно поставить на доску 6 на...
1
Среднее арифметическое восьми чисел равно 35, а среднее арифметическое...
3
Что составляет основу реляционной базы данных? Формы Поля и записи...
2
She said the students might use dictionaries if necessary нужно...
1
Кто может решить надо даю 35б....
1
Як ковалеві вдалося приборкати чорта? Ніч перед Різдвом...
2
var a,i:integer;
Begin
for i:=10 to 99 do
read(a);
if (a mod 10+ a div 10=10) then
write(a);
End.