Определите значение переменной c после выполнения следующего фрагмента программы a: =-5 b: =14 b: =b+a*2 if a> b then c: =a+b else c: =b-a a: =-5 b: =-3 b: =a-b*2 if a> b then c: =b-a else c: =a-b

ответ будет -6(минус шесть)

PascalABC.Net
var
  x,y,z:integer;
  m:single;
begin
  Write('Введите x,y,z: '); Read(x,y,z);
  m:=(max(max(3*x,y*z-x),z+x)+6*z)/(-5*min(x,z));
  Writeln(m)
end.

Тестовое решение:
Введите x,y,z: 3 6 -2
-0.3

Borland Pascal 7.01
uses Crt;
function max(m,n:integer):integer;
begin if m>n then max:=m else max:=n end;
function min(m,n:integer):integer;
begin if m<n then min:=m else min:=n end;
var
  x,y,z:integer;
  m:real;
begin
  ClrScr;
  Write('Введите x,y,z: '); Read(x,y,z);
  m:=(max(max(3*x,y*z-x),z+x)+6*z)/(-5*min(x,z));
  Writeln(m);
  ReadKey
end.

Тестовое решение:
Введите x,y,z: 3 6 -2
-3.0000000000E-01

ответ: С техникой обращаться бережно: не стучать по мониторам, не стучать мышкой о стол, не стучать по клавишам клавиатуры

2. При возникновении неполадок: появлении изменений в функционировании аппаратуры, самопроизвольного её отключения необходимо немедленно прекратить работу и сообщить об этом преподавателю

3. Не пытаться исправить неполадки в оборудовании самостоятельно

4. Выполнять за компьютером только те действия, которые говорит преподаватель

5. Контролировать расстояние до экрана и правильную осанку

6. Не допускать работы на максимальной яркости экрана дисплея

7. В случае возникновения нештатных ситуаций сохранять спокойствие и чётко следовать указаниям преподавателя.

Объяснение: