Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
milanareemets
18.11.2022 22:02 •
Информатика
Вводится 2-х значное число определить сколько дестятков и едениц программа в паскале
Показать ответ
Ответ:
mashakuznetsova211
06.10.2020 12:32
Var
A:byte;
Begin
Write('Введите двузначное число: ');ReadLn(A);
WriteLn('Количество десятков в нём: ',A div 10);
WriteLn('Количество единиц в нём: ',A mod 10);
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
artemkharlamov1
04.11.2021 21:43
Мистеру Фоксу поручено сделать 100 копий уникального документа. В его распоряжении есть три копировальных аппарата разной производительности. Первый выдает копии с...
Karina902
11.01.2020 01:55
У лисички Фикси три юбки: синяя, оранжевая и красная; четыре блузки: зеленая, синяя, оранжевая и желтая; пять бантиков: синий, зеленый, оранжевый, красный и желтый....
elizavetabobrova
07.05.2020 03:22
Иннокентий составляет семибуквенные слова из букв Е, И, Й, К, Н, О, Т. Сколько слов может составить Иннокентий, если известно, что в каждом из них есть комбинация КОТ?...
Денис228ннпп
07.05.2020 03:22
Відредагуйте подані словосполучення. Не повторюйте таких помилок ні в усному, ні в писемному мовленні.Ведучий бухгалтер; штатний розклад; замісник головного бухгалтера;...
soficaflymi
31.07.2021 18:30
N школьников делят K яблок поровну, неделящийся остаток остается в корзинке сколько яблок достанется каждому школьнику? программа получает на вход числа N и K и должна...
пвмыиыо
29.09.2022 01:27
как это решить в лазарусе ...
mrtwesor
27.05.2023 21:14
Почему Total 76% не меняется, хотя уже 100%...
СофияСтепанова
14.05.2022 01:51
Решить схему логического устройства...
маша111221
22.01.2022 08:47
Создайте программу выводящую на экран первые 55 элементов последовательности 1 3 5 7 9 11 13 15 17... на С++...
turanaliev241202
12.04.2022 01:48
Начальный момент в строке записана цифра 0 (ноль). На каждом из следующих 9 шагов выполняется следующая операция: в очередную строку записывается удвоенная предыдущая...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
A:byte;
Begin
Write('Введите двузначное число: ');ReadLn(A);
WriteLn('Количество десятков в нём: ',A div 10);
WriteLn('Количество единиц в нём: ',A mod 10);
End.