29.12.2011, 02:25 | #1 (permalink) |
Новичок
Регистрация: 29.12.2011
Сообщений: 4
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
Задача на языке Паскаль
|
29.12.2011, 02:25 | |
Helpmaster
Member
Регистрация: 08.03.2016
Сообщений: 0
|
Посоветую уделить немного времени прочтению схожих постов Расчет производной на языке турбо паскаль Задача на графику, Паскаль АВС Задача в Паскаль Очень нужна помощь в решении лабораторных на языке Паскаль Задача, Паскаль |
29.12.2011, 03:52 | #3 (permalink) |
Member
Регистрация: 27.02.2010
Сообщений: 659
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 1312
|
наверное лучше будет почитать соответствующую литературу. К примеру в книге "давайте создадим компилятор" эта тема полностью расписана + на яп турбо
Код:
var c: string; res: real; begin read(c); case c[2] of '+': res:= (ord(c[1])-48)+(ord(c[3])-48); '-': res:= (ord(c[1])-48)-(ord(c[3])-48); '*': res:= (ord(c[1])-48)*(ord(c[3])-48); '/': res:= (ord(c[1])-48)/(ord(c[3])-48); else write('error'); end; write('> ',res:2:1); end. операции проводятся только над цифрами. и считается, что пользователь вводит правильные данные. |
30.12.2011, 23:34 | #4 (permalink) |
Новичок
Регистрация: 29.12.2011
Сообщений: 4
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
спасибо большое!
|
Ads | |
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
|
|