Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
gdhdf
09.04.2021 17:59 •
Информатика
Запишите на языке паскаль программу,которая для произвольного натурального двузначного числа определяет: а)сумму и произведение его цифр,б)число,образованное перестановкой цифр исходного числа. плз.
Показать ответ
Ответ:
Wogk
01.07.2020 13:56
Var
Summ, proizv, per,A,b,n:integer;
Begin
Read(n);
A:=n div 10;
B:=n mod 10;
Summ:=a+b;
Proizv:=a*b;
Per:=b*10+a;
Write(Summ, proizv, per);
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
dasha198156
01.10.2022 06:01
Исполнитель калькулятор имеет только две команды, которым присвоены номера: вычти 1 умножь на 2 выполняя команду номер 1, калькулятор вычитает из числа на экране 1, а...
lananana2006
15.08.2022 16:45
На числовой прямой даны два отрезка: p = [12, 24] и q = [18 ,30]. отрезок a таков, что формула (x ∉ a) → ((x ∈ p) → (x ∉ q)) истинна при любом значении переменной x....
Дефектолог
05.07.2021 21:35
Вася пригласил друга коля в гости, но не сказал ему код подъезда, а прислал сообщение: «в последовательности цифр 8, 4, 9, 3, 6 все четные цифры разделить на два, а из...
Pazitifon3000
11.05.2020 01:03
Сделайте к этой программе блок схему, ! #include pch.h #include #include #include #include using namespace std; int main() { setlocale (lc_all, russian ); double i, z;...
viktorijavorob
24.11.2021 08:10
Сколько книг поместится на лазерный диск с объёмом 30 гиго байтов если книга с 70 страницами...
revon
12.02.2020 03:54
Ть з інформатикою програмування python 1)знайдіть довжину кола і площу круга, якщо відомо радіус? ...
bushukova16bk
27.03.2021 06:09
Выясните значение слова «эмерджентность». какое отношение оно имеет к теме, рассматриваемой в этом параграфе?...
Anastasiya2108
08.03.2021 16:07
Можно ли утверждать информационный процесс связанные с жизнью человека примеры...
ilyaastafiev20
26.02.2020 18:34
Как в python перевести число из 16сс в 10сс? ...
айсу17
28.02.2020 18:20
Разложите по числа12056725,34718516,5120,572017,2301210763...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Summ, proizv, per,A,b,n:integer;
Begin
Read(n);
A:=n div 10;
B:=n mod 10;
Summ:=a+b;
Proizv:=a*b;
Per:=b*10+a;
Write(Summ, proizv, per);
End.