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

Форум программистов: C++, Basic, Delphi, Pascal, JavaScript
Логин: Пароль:
Запомнить?  
@Mail.ru



Начать новую тему Ответить на тему  [ 1 сообщение ] 
Условные операторы в Pascal 
Автор Сообщение
Администратор
Аватара пользователя

Регистрация: 03.11.2007
Сообщения: 559
Откуда: Украина
Специальность:

Репутация: 6 [ ? ]
Сообщение Условные операторы в Pascal
Вычислить:


Алгоритм в виде диаграммы действий



Текст программы
program prg2;
var
{ http://nataliya.kiev.ua }
x,z:real;
begin
write('x=');
readln(x);
if x<=0
then
z:=sqr(x)*x
else
if x<4
then
z:=4-sqr(x)
else
z:=1;
writeln('z=',z:0:3);
readln;
end.

Результат работы программы
x=2
z=0.000

x=3
z=-5.000

x=9
z=1.000

x=0
z=0.000

x=-3
z=-27.000
Теория к программе
Условные операторы
Оператор IF
Общий вид:
IF <выражение V> THEN <оператор S1> [ELSE <оператор S2>];
Где: V - выражение логического типа (условие, за которым выполняется оператор S1 или S2). S1,S2 - один простой оператор (может быть составным).
Вложенный оператор IF
Условный оператор if может содержать в свою очередь также оператор if, например:
IF V1 THEN IF V2 THEN S1 ELSE S2
Для избежания ошибки лучше использовать операторные скобки:
IF V1 THEN BEGIN
IF V2 THEN S1
ELSE S2
END;
Оператор выбора CASE
Используется в том случае, если переменная может принимать ряд дискретных значений. Общий вид оператора:
CASE <K> OF
<значение K1 или список значений K1>: S1
<значение K2 или список значений K2>: S2
.
.
<значение KN или список значений N>: SN
[ELSE SN+1]
END;
Где: K - выражение или переменная перечислимого типа;
S1 .. SN+1 - операторы, которые используются в том случае, если выражение или переменная K приобретает соответствующее значение. Они могут быть составными.



11.11.2007 18:48
Профиль ICQ
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ 1 сообщение ] 


Кто сейчас на конференции

Зарегистрированные пользователи: Google [Bot]


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Перейти:  
© 2013 «Форум программистов Украины»