Аватар для JD_GIRL
0 / 0 / 0
Регистрация: 19.06.2012
Сообщений: 5
1

Найти произведение цифр двухзначного числа

19.06.2012, 07:17. Показов 2709. Ответов 10
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
nujnapomsh' s zadachami na assembler. esli mojno s detal'nimi poyasneniyami. ya novichok v etoy oblasti.
vot zadachi:
1) dano dvuznachnoye chislo. nayti proizvedeniye ego cifr.
2) dani radius kruga i storona kvadrata. u kakoy figuri ploshad' bol'she?
zaranee blagodarna
0
19.06.2012, 07:17
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
19.06.2012, 07:17
Ответы с готовыми решениями:

Найти какая из цифр двухзначного числа больше
Помогите с написанием программы пожалуйста. Условие: напишите программу, которая определяет, какая из цифр двухзначного числа больше:...

Определить парность цифр двухзначного числа
Помогите, не знаю что уже делать, дебагер выдаёт деление на ноль, перепробовал всё что знал (Где комменты - было дано учителем) sseg...

Найти сумму всех чисел натурального ряда чисел от 1 до двухзначного беззнакового целого числа
Найти сумму всех чисел натурального ряда чисел от 1 до двухзначного беззнакового целого числа(Вводится с клавиатуры) Помогите пожалуйста....

10
 Аватар для rovengod
3 / 3 / 0
Регистрация: 03.02.2012
Сообщений: 32
19.06.2012, 08:33 2
Первая задача
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
uses crt;
var a,b,d,c:integer;
begin
readln(a);
b:=10;
asm
mov ax,a
idiv b
mov c,ax
imul b
mov bx, ax
mov cx,a
sub cx,bx
mov ax,c
imul cx
mov d,ax
end;
writeln(d);
readkey; end.
1
magirus
19.06.2012, 10:40
  #3
 Комментарий администратора 
JD_GIRL, translit.ru на будущее...
0
16 / 10 / 0
Регистрация: 14.06.2012
Сообщений: 25
19.06.2012, 11:26 4
Всё намного проще:

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
uses Crt;
var a, b : byte;
 
begin
ClrScr;
Write('Enter a number: ');
Readln(a);
asm
  xor ax, ax        {очистка регистра}
  mov al, a
  aam                {преобразование числа в al из 16-чного формата в неупакованное BCD-число}
  mov cl, ah        {десятки переносим в cl, единицы остаются в al}
  mul cl
  mov b, al
end;
Writeln('Result: ', b);
Readln
end.
1
 Аватар для JD_GIRL
0 / 0 / 0
Регистрация: 19.06.2012
Сообщений: 5
19.06.2012, 11:39  [ТС] 5
magirus буду иметь ввиду. извиняюсь

Добавлено через 5 минут
DarkVeiL, а вторую можешь решить?
0
16 / 10 / 0
Регистрация: 14.06.2012
Сообщений: 25
19.06.2012, 12:17 6
Площадь круга pR2 отличается от площади квадрата R2 ровно в p раз. Поэтому, если радиус равен стороне квадрата, площадь круга всегда будет больше. Если радиус круга и сторона квадрата - разные значения, вот программа, вычисляющая большую площадь:

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
uses Crt;
var
   a, b : integer;
   rez1, rez2: double;
 
begin
ClrScr;
Write('Enter a radius: ');
Readln(a);
Write('Enter a side of a square: ');
Readln(b);
asm
  finit
  fild a
  fmul st, st
  fldpi
  fmulp
  fstp rez1
  fild b
  fmul st, st
  fstp rez2
end;
if (rez1 < rez2) then
  Writeln(rez1:0:4, ' < ', rez2:0:4)
else
  Writeln(rez1:0:4, ' > ', rez2:0:4);
Readln
end.
Чтобы она откомпилировалась, в редакторе паскаля в настройках Options -> Compiler необходимо включить режим сопроцессора 8087.
0
 Аватар для JD_GIRL
0 / 0 / 0
Регистрация: 19.06.2012
Сообщений: 5
19.06.2012, 12:27  [ТС] 7
Pascal
1
2
3
4
5
6
7
8
9
10
11
asm
  finit
  fild a
  fmul st, st
  fldpi
  fmulp
  fstp rez1
  fild b
  fmul st, st
  fstp rez2
end;
Добавлено через 46 секунд
а можешь эту часть разъяснить?
0
Ушел с форума
Автор FAQ
 Аватар для Mikl___
16347 / 7664 / 1077
Регистрация: 11.11.2010
Сообщений: 13,720
19.06.2012, 12:32 8
JD_GIRL, а самой попробовать разобраться? учебник полистать, гуглом воспользоваться...
Assembler
1
2
3
4
5
6
7
8
9
finit; инициализазация сопроцессора
  fild a; берем радиус
  fmul st, st; возводим его в квадрат
  fldpi; загружаем число Пи
  fmulp; перемножаем
  fstp rez1; переменная rez1:=a*a*pi площадь круга
  fild b; площадь квадрата вычисляется по аналогии
  fmul st, st
  fstp rez2
0
 Аватар для JD_GIRL
0 / 0 / 0
Регистрация: 19.06.2012
Сообщений: 5
19.06.2012, 12:45  [ТС] 9
Mikl___, по времени не успеваю. мне эти программы сдать надо, а потом уже сяду и разберусь. спасибо за помощь
0
Ушел с форума
Автор FAQ
 Аватар для Mikl___
16347 / 7664 / 1077
Регистрация: 11.11.2010
Сообщений: 13,720
19.06.2012, 12:49 10
Цитата Сообщение от JD_GIRL Посмотреть сообщение
Mikl___, по времени не успеваю. мне эти программы сдать надо, а потом уже сяду и разберусь...
Morgen, morgen, nur nicht heute, sagen alle faulen Leute
0
 Аватар для JD_GIRL
0 / 0 / 0
Регистрация: 19.06.2012
Сообщений: 5
19.06.2012, 12:54  [ТС] 11
увы, сессия не дает отвлекаться на изучение нового материала.
0
19.06.2012, 12:54
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
19.06.2012, 12:54
Помогаю со студенческими работами здесь

Определить произведение нечетных цифр числа
Здрасьте. Очень срочно нужно сдать задание на ассемблере, пока не отчислили =-O Кто может накинуть код, буду очень благодарен. ...

[NASM+DOS+COM] Вывод двухзначного шестнадцатеричного числа
Народ выручайте, в коде вроде все правильно и по идее должен вывести 3f а выводит 33, может кто знает в чем проблема?org 100h ; ...

Определить произведение четных цифр числа, стоящих в нечетных позициях
Создание программ неленейной структуры с использыванием команд условного перехода и цыкла Задано натуральное число, диапазон значений...

Преобразование двухзначного шестнадцатеричного числа в символьном виде в двоичное представление. Обработать и строчные.
Всем привет, совсем нуб в ассемблере. Нужно дописать программу преобразования двухзначного шестнадцатеричного числа в символьном виде в...

Дано шестизначное число, найти произведение его цифр
Дано шестизначное число, найти произведение его цифр. Ребят помогите, очень нужно.


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
11
Ответ Создать тему

Редактор формул (кликните на картинку в правом углу, чтобы закрыть)
Опции темы

Новые блоги и статьи
Отличия между venv, pyenv, pyvenv, virtualenv, pipenv, conda, virtualenvwrapp­­er, poetry и другими в Python
hw_wired 13.02.2025
В Python существует множество средств для управления зависимостями и виртуальными окружениями, что порой вызывает замешательство даже у опытных разработчиков. Каждый инструмент создавался для решения. . .
Навигация с помощью React Router
hw_wired 13.02.2025
React Router - это наиболее распространенное средство для создания навигации в React-приложениях, без которого сложно представить современную веб-разработку. Когда мы разрабатываем сложное. . .
Ошибка "error:0308010C­:digi­tal envelope routines::unsup­ported"
hw_wired 13.02.2025
Если вы сталкиваетесь с ошибкой "error:0308010C:digital envelope routines::unsupported" при разработке Node. js приложений, то наверняка уже успели поломать голову над её решением. Эта коварная ошибка. . .
Подключение к контейнеру Docker и работа с его содержимым
hw_wired 13.02.2025
В мире современной разработки контейнеры Docker изменили подход к созданию, развертыванию и масштабированию приложений. Эта технология позволяет упаковать приложение со всеми его зависимостями в. . .
Отличия интерфейсов и типов в TypeScript
hw_wired 13.02.2025
TypeScript - мощное средство для создания качественного и поддерживаемого кода, который расширяет возможности JavaScript, добавляя систему статической типизации. В отличие от динамической типизации. . .
Async/await в циклах JavaScript
hw_wired 13.02.2025
Современная веб-разработка немыслима без асинхронного программирования. Когда приложение выполняет длительные операции - загрузку данных с сервера, чтение файлов или обработку медиа-контента, важно. . .
Git не работает на MacOS после апдейта
hw_wired 13.02.2025
После очередного обновления MacOS многие разработчики сталкиваются с неприятным сюрпризом - Git перестает работать и выдает ошибку "xcrun: error: invalid active developer path". Эта проблема особенно. . .
Git отказывается объединять несвязанные истории
hw_wired 13.02.2025
Git работает безупречно, пока мы не сталкиваемся с особыми ситуациями вроде объединения веток с разными корнями истории. В таких случаях система контроля версий может преподнести неприятный сюрприз в. . .
Проверка email с помощью JavaScript
hw_wired 13.02.2025
Email-адреса имеют довольно запутанную спецификацию, которая допускает множество неочевидных вариантов написания. Например, знали ли вы, что адрес вида "name+tag@domain. com" или даже. . .
Замена всех вхождений строки с помощью JavaScript
hw_wired 13.02.2025
JavaScript предлагает несколько способов для выполнения операций замены в строках, каждый из которых имеет свои особенности и область применения. От простейшей замены первого найденного вхождения до. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru