Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 12.03.2011, 10:41   #1
p0weR
 
Регистрация: 01.03.2011
Сообщений: 5
По умолчанию Выполнить разные вычисления в зависимости от значения переменной. (Pascal)

Нужно решить задачу.

Вообщем задача такова:

Если op=1 тогда переменная (а) равна: x1+x2
Если op=2 тогда переменная (а) равна: x1-x2
Если op=3 тогда переменная (а) равна: x1*x2
Если op=4 тогда переменная (а) равна: x1/x2

Не помню задание точно, но вроде должно быть так.


Вы когда нибудь научитесь темам правильные названия давать?!
Модератор.

Последний раз редактировалось Serge_Bliznykov; 12.03.2011 в 11:31.
p0weR вне форума
Старый 12.03.2011, 11:29   #2
GetMax
Форумчанин
 
Регистрация: 21.10.2010
Сообщений: 588
По умолчанию

И что вам непонятно? Задача простейшая. Откройте любой учебник по паскалю тема "Условный оператор" и разберитесь. Рискну предположить, что вам просто лень разбираться во всем самому и вы ищите халявы.
Пользователь не знает, чего он хочет, пока не увидит то, что он получил.
Для благодарностей WMR R145235935681
GetMax вне форума
Старый 12.03.2011, 11:34   #3
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

либо
Код:
if op = 1 then a := x1+x2;
if op = 2 then a := x1-x2;
либо
Код:
case op of
  1: a := x1+x2;
  2: a := x1-x2;
 ....
end;
Serge_Bliznykov вне форума
Старый 12.03.2011, 11:40   #4
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,792
По умолчанию

Код:
...
case op of
 1:a:=x1+x2;2:a:=x1-x2;3:a:=x1*x2;
 4:begin if x2<>0 then a:=x1/x2 else Writeln('Ты че творишь? Ану бегом учить математику!!!'); end;
end;
...
Смысл ясен?
I'm learning to live...
Stilet вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как в модуле, менять значение переменной в зависимости от выбранного Листа valerij Microsoft Office Excel 43 03.11.2010 20:18
В зависимости от значения в ComboBox1 выводить значения в ComboBox2 LeX2009 БД в Delphi 14 21.05.2010 16:49
паскаль - Составить программу вычисления функции y зависимости от значения t. masha.m Помощь студентам 3 18.05.2010 16:03
Присвоить разные значения параметру при вставке записи в базу Gover БД в Delphi 3 19.04.2010 21:37
Окраска ячейки в зависимости от значения Апчхи Microsoft Office Excel 6 16.08.2009 19:31