Глазкова633

16.12.2020

PascalABС Дано двухзначное число. Рассчитать произведение его цифр. Задачу решить через процедуру.

Информатика

Ответить

Ответы

karpachevamarina

16.12.2020

3 4 5 6 7 8 9 10 11 program Integer7; var A, Res: Integer; begin Write('Введите двузначное число: '); Readln(A); Res:=(A div 10) + (A mod 10); Writeln('Сумма его цифр равна: ',Res); Res:=(A div 10) * (A mod 10); Writeln('Произведение его цифр равно: ',Res); end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

PascalABС Дано двухзначное число. Рассчитать произведение его цифр. Задачу решить через процедуру.

▲

PascalABС Дано двухзначное число. Рассчитать произведение его цифр. Задачу решить через процедуру.

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

Популярные вопросы в разделе

разобраться.Информатика.Фото выше заранее)

Напишите программу, которая вводит натуральное число n и выводит первые n четных натуральных чисел

Можете подобрать язык программирования для создания пиксельной игра на подобии Undertale или Heartbound? Заранее

Постройте таблицу истинности сложного логического высказывания: а вверху черта * (в + с вверху черта)

Найти сумму первых 5 натуральных чисел .В Паскаль

На вход программы, фрагмент которой приведённой ниже, поданы числа 10 и 15. read x, y; if x>y then begin x:=x – y; y:=x+y end else begin y:=y – x; x:=x - y end; write (x, ‘ ‘, y) Какие значен...

Вычислить значение выражения: 4 = |2x| + √3/х, при х = 5 паскаль abc

2(в 45-ой степени) бит=2(в x степени)гб найдите x.

PascalABС Дано двухзначное число. Рассчитать произведение его цифр. Задачу решить через процедуру.

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

Популярные вопросы в разделе

разобраться.Информатика.Фото выше заранее)​

Напишите программу, которая вводит натуральное число n и выводит первые n четных натуральных чисел

Можете подобрать язык программирования для создания пиксельной игра на подобии Undertale или Heartbound? Заранее

Постройте таблицу истинности сложного логического высказывания: а вверху черта * (в + с вверху черта)

Найти сумму первых 5 натуральных чисел .В Паскаль

На вход программы, фрагмент которой приведённой ниже, поданы числа 10 и 15. read x, y; if x&gt;y then begin x:=x – y; y:=x+y end else begin y:=y – x; x:=x - y end; write (x, ‘ ‘, y) Какие значен...

Вычислить значение выражения: 4 = |2x| + √3/х, при х = 5 паскаль abc

2(в 45-ой степени) бит=2(в x степени)гб найдите x.

разобраться.Информатика.Фото выше заранее)

На вход программы, фрагмент которой приведённой ниже, поданы числа 10 и 15. read x, y; if x>y then begin x:=x – y; y:=x+y end else begin y:=y – x; x:=x - y end; write (x, ‘ ‘, y) Какие значен...