Условный оператор и оператор выбора. Возможные ошибки: различия между версиями

Материал из Вики проекта PascalABC.NET
Перейти к навигацииПерейти к поиску
Нет описания правки
Строка 1: Строка 1:
__NOTOC__
__NOTOC__
=== Неверная расстановка begin end ===
=== Неверная расстановка begin end ===
<source lang="Delphi">var
  x,y: integer;
  v: integer;
begin
  write('Введите x,y: ');
  readln(x,y);
  begin // ошибка: операторные скобки должны использоваться по ветке then оператора if
    if x>y then
      v := x;
      x := y;
      y := v
  end;
  writeln('Результат упорядочения по возрастанию: ',x,' ',y);
end.</source>
=== Отсутствие begin end ===
=== Отсутствие begin end ===
=== Неверная расстановка скобок в сложном логическом выражении ===
=== Неверная расстановка скобок в сложном логическом выражении ===
== Ссылки ==
== Ссылки ==
[[Алгоритмы_для_начинающих_на_примерах|Алгоритмы для начинающих]]
[[Алгоритмы_для_начинающих_на_примерах|Алгоритмы для начинающих]]

Версия от 00:25, 19 ноября 2009

Неверная расстановка begin end

var 
  x,y: integer;
  v: integer;
begin
  write('Введите x,y: ');
  readln(x,y);
  begin // ошибка: операторные скобки должны использоваться по ветке then оператора if
    if x>y then
      v := x;
      x := y;
      y := v
  end;
  writeln('Результат упорядочения по возрастанию: ',x,' ',y);
end.

Отсутствие begin end

Неверная расстановка скобок в сложном логическом выражении

Ссылки

Алгоритмы для начинающих

Источник — https://pascalabc.net/wiki/index.php?title=Условный_оператор_и_оператор_выбора._Возможные_ошибки&oldid=1021