Рейтинг@Mail.ru
Menu
Скачать картинки на телефон бесплатно.
Заставки для телефона, аватарки.
(Вырезать из фотографии)

Роза `Гренд Могул` Яхта `Алиса` Лесное озеро Музей `Пирогово` Белочка
Выберите рубрику (тему)

Тема: Условные операторы

Программа 2

Вычислить:
Условные операторы.
Вычислить

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

Условные операторы.
Программа 2.
Вычислить.
Алгоритм в виде диаграммы действий

Текст программы

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 приобретает соответствующее значение. Они могут быть составными.

Случайный анекдот

Семья, папа и дочка рисуют. Только дочка рисует в альбоме, а папа в Photoshop'е.
Дочка: - Папа. папа. Я случайно разлила краску на лист.
Папа: - Ты только ничего не трогай, а сразу жми Undo.
Дата: 20-10-2004   Автор: Admin   Подрубрика: Компьютеры и дети