Тут необходимо помнить несколько основных правил: Если в примере отсутствуют скобки и присутствуют операции - только сложение и вычитание, либо только умножение и деление - в этом случае все действия осуществляются по порядку слева на право. Например, 5+8-5=8(выполняем все по порядку - к 5 прибавляем 8, а затем отнимаем 5) Если в примере присутствуют смешанные операции - и сложение, и вычитание, и умножение, и деление, то в первую очередь выполняем операции умножение и деление, а затем только сложение или вычитание. Например, 5+8*3=29 (сначала 8 умножаем на 3, а затем прибавляем 5) Если в примере имеются скобки, то вначале выполняются действия в скобках. Например, 3*(5+8)=39 (сначала 5+8, а затем умножаем на 3)
uses Crt; var A, B, C; integer; begin ClrScr; while (A > -10) and (A < 10) do while (B > -10) and (B < 10) do begin write(' Ввести два целых числа: '); readln(A, B); C:= A * B; writeln(' Произведение равно: ' ,C); end; writeln(' Программа завершена.'); readln end.
На выходе:
uses Crt; var A, B, C; integer; begin ClrScr; while (A > -10) and (A < 10) do while (B > -10) and (B < 10) do begin write(' Ввести два целых числа: '); readln(A, B); C:= A * B; writeln(' Произведение равно: ' ,C); end; writeln(' Программа завершена.'); readln end.
Если в примере отсутствуют скобки и присутствуют операции - только сложение и вычитание, либо только умножение и деление - в этом случае все действия осуществляются по порядку слева на право.
Например, 5+8-5=8(выполняем все по порядку - к 5 прибавляем 8, а затем отнимаем 5)
Если в примере присутствуют смешанные операции - и сложение, и вычитание, и умножение, и деление, то в первую очередь выполняем операции умножение и деление, а затем только сложение или вычитание.
Например, 5+8*3=29 (сначала 8 умножаем на 3, а затем прибавляем 5)
Если в примере имеются скобки, то вначале выполняются действия в скобках.
Например, 3*(5+8)=39 (сначала 5+8, а затем умножаем на 3)
uses Crt; var A, B, C; integer; begin ClrScr; while (A > -10) and (A < 10) do while (B > -10) and (B < 10) do begin write(' Ввести два целых числа: '); readln(A, B); C:= A * B; writeln(' Произведение равно: ' ,C); end; writeln(' Программа завершена.'); readln end.
На выходе:
uses Crt; var A, B, C; integer; begin ClrScr; while (A > -10) and (A < 10) do while (B > -10) and (B < 10) do begin write(' Ввести два целых числа: '); readln(A, B); C:= A * B; writeln(' Произведение равно: ' ,C); end; writeln(' Программа завершена.'); readln end.