![]() |
Модераторы: Poseidon |
![]() ![]() ![]() |
|
Glebaka |
|
|||
Новичок Профиль Группа: Участник Сообщений: 3 Регистрация: 8.3.2008 Репутация: нет Всего: нет |
Представьте себе, что в вашем распоряжении имеется набор текстов программ для примитивной вычислительной машины (ПВМ ). ПВМ умеет работать только с целыми числами и обладает памятью размером одно целое число. До начала выполнения программы в ячейке памяти
лежит 0. Каким образом можно программировать на ПВМ. Любая программа на ПВМ начинается командой START и заканчивается командой FINISH. Все команды разделяются между собой точкой с запятой. Также ПВМ понимает команды: ● ASSIGN <x>; вместо <x> должно стоять целое число, после выполнения команды в ячейку памяти вписывается число <x> ● ADD <x>; вместо <x> должно стоять целое число, после выполнения команды в ячейку памяти вписывается сумма содержимого ячейки памяти и числа <x> ● SUB <x>; вместо <x> должно стоять целое число, после выполнения команды в ячейку памяти вписывается разность содержимого ячейки памяти и числа <x> ● DIV <x>; вместо <x> должно стоять целое число, после выполнения команды в ячейку памяти вписывается результат деления содержимого ячейки памяти на число <x> ● MULT <x>; вместо <x> должно стоять целое число, после выполнения команды в ячейку памяти вписывается результат умножения содержимого ячейки памяти на число <x> ● POW <x>; вместо <x> должно стоять целое число, после выполнения команды в ячейку памяти вписывается содержимого ячейки памяти, возведенное в степень <x> ● WRITE; команда пишет содержимое ячейки памяти на экран Ваша задача написать программу на языке Pascal, которая спрашивает у пользователя текст программы на ПВМ, и выполняет его. Примеры программы для ПВМ: START; ASSIGN 10; ADD 5; MULT 12; WRITE; ASSIGN -3; MULT 7; ADD 20; POW 3; WRITE; FINISH; Результат выполнения: 180 и -1 Между командами, и между параметрами внутри команды может быть произвольное количество пробелов. Предполагаем, что программы, которые будет вводить пользователь, будут корректны для ПВМ. Просьба помочь в написании этой программы. надо использовать copy,insert,delete,pos,vAl ,string |
|||
|
||||
mr.Anderson |
|
|||
![]() iOS Lead Developer ![]() ![]() ![]() ![]() Профиль Группа: Участник Клуба Сообщений: 3374 Регистрация: 20.12.2004 Где: далеко Репутация: 16 Всего: 128 |
Glebaka, стучись в аську 315533206 .
|
|||
|
||||
Glebaka |
|
|||
Новичок Профиль Группа: Участник Сообщений: 3 Регистрация: 8.3.2008 Репутация: нет Всего: нет |
(( я не юзаю ICQ , есть skype - gleb-14
|
|||
|
||||
Kuvaldis |
|
|||
![]() механик-вредитель ![]() ![]() ![]() Профиль Группа: Участник Клуба Сообщений: 1189 Регистрация: 16.6.2006 Где: Минск Репутация: 32 Всего: 61 |
-------------------- Помни - когда ты спишь, враг не дремлет Спи чаще и дольше, изматывай врага бессоницей |
|||
|
||||
![]() ![]() ![]() |
Правила форума "Центр помощи" | |
|
ВНИМАНИЕ! Прежде чем создавать темы, или писать сообщения в данный раздел, ознакомьтесь, пожалуйста, с Правилами форума и конкретно этого раздела.
Более подробно с правилами данного раздела Вы можете ознакомится в этой теме. Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Poseidon, Rodman |
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей) | |
0 Пользователей: | |
« Предыдущая тема | Центр помощи | Следующая тема » |
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |