Определите значение переменной c после выполнения следующего фрагмента программы, в котором a, b и c – переменные вещественного (действительного) типа. бейсик паскаль a = 5 b = 16 b = b - 3 * a if a > b then c = a – b else c = b + a endif a : = 5; b : = 16; b : = b - 3 * a; if a > b then c : = a – b else c : = b + a си алгоритмический язык a = 5; b = 16; b = b - 3 * a; if (a > b) c = a – b; else c = b + a; a : = 5 b : = 16 b : = b - 3 * a если a > b то c : = a – b иначе c : = b + a все 1) 4 2) 6 3) 60

A: = 5; b : = 16; b : = b - 3 * a;     тоесть   b: =16-3*5=1; if a > b     (так как 5> 1) то c: =a-b=5-1=4 then  c : = a – b else c : = b + aответ 4

Const   n = 10;   m = 10; type   matrix = array[1..n, 1..m] of integer; procedure entermas(var mas: matrix); var  i, j: integer; begin   randomize;   for i : = 1 to n do       for j : = 1 to m do           mas[i, j] : = random(100); end; procedure givemas(var mas: matrix); var  i, j: integer; begin   for i : = 1 to n do   begin       for j : = 1 to m do       begin           write(mas[i, j], ' ');       end;       writeln;   end; end; function sumstroki(mas: matrix; i, k: integer): integer; var   j, sum: integer; begin   sum : = 0;   for j : = 1 to m do       sum : = sum + mas[i, j];   sumstroki : = sum - k; end; function element(var mas: matrix): integer; var   i, j, count: integer; begin   count : = 0;   for i : = 1 to n do       for j : = 1 to m do           if mas[i, j] > sumstroki(mas, i, mas[i, j]) then inc(count);   element : = count; end; var  mas: matrix;   sum, max: integer; begin   entermas(mas);   givemas(mas);   writeln('кол-во особых элементов ', element(mas)); end.

Язык паскаль был создан  никлаусом виртом  в 1968—1969 годах после его участия в работе комитета разработки стандарта языка  алгол-68. язык назван в честь французского , , и философа  блеза паскаля, который создал первую в мире механическую машину, складывающую два числа. первая публикация вирта о языке датирована 1970 годом, представляя язык, автор указывал в качестве цели его создания  — построение небольшого и эффективного языка, способствующего хорошему стилю программирования, использующемуструктурное программирование  и структурированные данные.