Question

Найдите ошибки в программах: 1). var a,b,c,d,f,p: integer; begin writeln('Введите 5 численных значений:'); readln(a,b,c,d,f); p=a+b+c+d+f; writeln('p=',p); end. 1. неверная запись оператора присваивания 2. отсутствует раздел переменных 3. в операторе ввода используется неверный разделитель 2). program Prim_2_1; var a,b,c: integer; begin writeln(″Введите 3 численных значения:″); readln(a,b,c); s:=a+b+c; writeln(″s=″,s); end. 1. неверно построен раздел переменных 2. имя программы написано неправильно 3. использованы неверные ограничители текстовых частей 3). program Prim_2_1; begin readln(a,b,c); p:=(a+b+c)*2; writeln('p=',p); end. 1. отсутствует раздел переменных 2. отсутствует ввод данных 3. неверная запись оператора присваивания 4). var a,b: integer; begin writeln('Введите 5 численных значений:'); p:=a+b+c+d+f; writeln('p=',p); end. 1. неверно сделано описание переменных 2. отсутствует ввод переменных 3. отсутствуют вывод данных 5). program Prim_2_1; var a,b,c: integer; begin writeln('Введите 2 численных значения:'); readln(a,b,c); с:=a/b; writeln('c=',c); end. 1. неверно описан тип данных 2. отсутствуют вычисления в программе 3. ошибка в записи оператора присваивания. 6). var a,b,c,d,f,p: integer; begin writeln('Введите 5 численных значений:'); readln(a,b,c,d,f); writeln('p=',p); end. 1. отсутствует команда завершения программы 2 отсутствует команда начала программы 3. отсутствуют вычисления в программе 7). var a,b,c: integer; writeln('Введите 2 численных значения:'); readln(a,b); с:=a div b; writeln('c=',c); end. 1. отсутствует команда начала программы 2. допущена ошибка в операторе присваивания 3. отсутствует команда завершения программы 8). var a,b,c: integer; d: real; begin writeln('Введите 3 численных значения:'); readln(a,b,c); d:=(a+b+c)/2; writeln('d=',d); end. 1. допущена ошибка в блоке описания переменных 2. использованы неверные разделители в записи оператора ввода данных. 3. отсутствует имя программы. 9). В результате выполнения программы при вводе чисел 4, 6, 7 (порядок перечисления данных соответствует порядку перечисления вводимых переменных) на экран выводится: var a,b,c: integer; begin writeln('Введите 3 численных значения:'); readln(a,b,c); p:=((a+b) mod 2)+c; writeln('p=',p); end. 1. число 12 2. число 7 3. число 8 10). Следующий алгоритм в результате выполнения программы находит значение выражения: var x: integer; y: real; begin writeln('Введите x:'); readln(x); y:=(15*sgr(x)*x+x mod 6-29)/2; writeln('y=',y); end. 1. y=(15x+x/6-29)/2 2. y=(15x3+(целая часть от деления x на 6)-29)/2 3. y=(5x3+(остаток от деления числа x на 6)-29)/2

Answer 1

Ответ:

1)1. 2)3. 3)1. 4)1 и 2. 5)1. 6)3. 7)1. 8)3. 9)2. 10)3.

Answer 2

Программы, которые вы предоставили, содержат несколько ошибок. Давайте рассмотрим каждую программу по отдельности и исправим ошибки.

Программа 1:

pascalCopy code
var a,b,c,d,f,p: integer;
begin
  writeln('Введите 5 численных значений:');
  readln(a,b,c,d,f);
  p := a + b + c + d + f;
  writeln('p=', p);
end.

Проблемы:

1. Отсутствует команда начала программы (program).
2. В этой программе нет ошибок.

Программа 2:

pascalCopy code
var a,b,c: integer;
begin
  writeln('Введите 3 численных значения:');
  readln(a,b,c);
  s := a + b + c; // Ошибка: отсутствует объявление переменной "s"
  writeln('s=', s);
end.

Проблемы:

1. Отсутствует объявление переменной s.
2. В этой программе нет ошибок в имени программы и ограничителях текста.

Программа 3:

pascalCopy code
program Prim_2_1;
begin
  readln(a, b, c); // Ошибка: отсутствует объявление переменных "a", "b", "c"
  p := (a + b + c) * 2;
  writeln('p=', p);
end.

Проблемы:

1. Отсутствует объявление переменных a, b и c.
2. Отсутствует ввод данных.

Программа 4:

pascalCopy code
var a,b: integer;
begin
  writeln('Введите 5 численных значений:');
  p := a + b + c + d + f; // Ошибка: отсутствуют объявления переменных "c", "d", "f"
  writeln('p=', p);
end.

Проблемы:

1. Отсутствуют объявления переменных c, d и f.
2. Отсутствует ввод переменных.
3. Отсутствует вывод данных.

Программа 5:

pascalCopy code
program Prim_2_1;
var a,b,c: integer;
begin
  writeln('Введите 2 численных значения:');
  readln(a,b,c); // Ошибка: ожидаются 2 переменных, а дано 3
  c := a / b; // Ошибка: ошибка в записи оператора присваивания
  writeln('c=', c);
end.

Проблемы:

1. Ожидается ввод 2 переменных, но дано 3.
2. Ошибка в записи оператора присваивания.

Программа 6:

pascalCopy code
var a,b,c,d,f,p: integer;
begin
  writeln('Введите 5 численных значений:');
  readln(a,b,c,d,f);
  writeln('p=', p); // Ошибка: переменная "p" не проинициализирована
end.

Проблемы:

1. Отсутствует команда начала программы (program).
2. Отсутствует команда завершения программы (end.).
3. Отсутствует вычисления в программе.
4. Переменная p не проинициализирована.

Программа 7:

pascalCopy code
var a,b,c: integer;
begin
  writeln('Введите 2 численных значения:');
  readln(a,b);
  c := a div b; // Ошибка: использованы неверные разделители в записи оператора ввода данных
  writeln('c=', c);
end.

Проблемы:

1. Отсутствует команда начала программы (program).
2. Ошибка в операторе присваивания.
3. Отсутствует команда завершения программы (end.).

Программа 8:

pascalCopy code
var a,b,c: integer; d: real;
begin
  writeln('Введите 3 численных значения:');
  readln(a,b,c);
  d := (a + b + c) / 2;
  writeln('d=', d);
end.

Проблемы:

1. В объявлении переменных отсутствует разделитель (;).
2. Использованы неверные разделители в операторе ввода данных.
3. Отсутствует имя программы.

Программа 9:

pascalCopy code
var a,b,c: integer;
begin
  writeln('Введите 3 численных значения:');
  readln(a,b,c);
  p := ((a + b) mod 2) + c; // Ошибка: отсутствует объявление переменной "p"
  writeln('p=', p);
end.

Проблемы:

1. Отсутствует объявление переменной p.

Программа 10:

pascalCopy code
var x: integer; y: real;
begin
  writeln('Введите x:');
  readln(x);
  y := (15 * x * x + x mod 6 - 29) / 2; // Ошибок нет
  writeln('y=', y);
end.

В данной программе ошибок нет. Формула вычисления значения y правильно преобразована.