1. Задача 13 (инструкция для преподавателя) Пожалуйста, укажите неверно записанные операторы, учитывая, что описания переменных выглядят следующим образом: var n, k: integer; R: real;. Пожалуйста, приведите обоснование ответа.
2. Задача 13 (инструкция для преподавателя) Пожалуйста, напишите, что будет выведено на экран после выполнения операторов: n := 15; k := 1 / 2; n := SQR(15)*k; k := n + k; Writeln ("n =", n:8:2); Writeln ("k = ", k:9:3);
3. Задача 13 (инструкция для преподавателя) Пожалуйста, напишите программу для решения следующей задачи: Даны два действительных числа. Найти среднее арифметическое этих чисел и среднее значение расстояния между ними.
2. Задача 13 (инструкция для преподавателя) Пожалуйста, напишите, что будет выведено на экран после выполнения операторов: n := 15; k := 1 / 2; n := SQR(15)*k; k := n + k; Writeln ("n =", n:8:2); Writeln ("k = ", k:9:3);
3. Задача 13 (инструкция для преподавателя) Пожалуйста, напишите программу для решения следующей задачи: Даны два действительных числа. Найти среднее арифметическое этих чисел и среднее значение расстояния между ними.
Nikita
1. Задача 13.
Неверно записанные операторы:
- n := 15 k;
- k := 1 / 2 ;
- n := SQR 15 * k ;
- k := n + k ;
Обоснование ответа:
- Ошибка в команде n := 15 k; - пропущена запятая между переменными n и k, правильно будет n, k := 15;
- Ошибка в команде k := 1 / 2 ; - пропущен оператор присваивания двоеточие после переменной k, правильно будет k := 1 / 2;
- Ошибка в команде n := SQR 15 * k ; - пропущены скобки вокруг числа 15, правильно будет n := SQR(15) * k;
- Ошибка в команде k := n + k ; - пропущен символ умножения "*", правильно будет k := n * k;
2. Задача 13.
Результат выполнения операторов:
n := 15;
k := 1 / 2;
n := SQR(15) * k;
k := n + k;
Writeln ("n =", n:8:2);
Writeln ("k = ", k:9:3);
После выполнения этих операторов на экран будет выведено:
n = 337.5
k = 337.5
3. Задача 13.
Программа для решения задачи:
program average;
var
a, b, avrg: real;
begin
Write("Введите первое число: ");
Readln(a);
Write("Введите второе число: ");
Readln(b);
avrg := (a + b) / 2;
Writeln("Среднее арифметическое: ", avrg:0:2);
end.
Объяснение:
- В программе объявляются переменные a, b и avrg для хранения двух чисел и среднего арифметического.
- С помощью функции Readln пользователь вводит два действительных числа.
- Затем, используя формулу среднего арифметического (avrg := (a + b) / 2), вычисляется среднее значение.
- Результат выводится с помощью функции Writeln.
- После выполнения программы на экран будет выведено среднее арифметическое двух чисел.
Неверно записанные операторы:
- n := 15 k;
- k := 1 / 2 ;
- n := SQR 15 * k ;
- k := n + k ;
Обоснование ответа:
- Ошибка в команде n := 15 k; - пропущена запятая между переменными n и k, правильно будет n, k := 15;
- Ошибка в команде k := 1 / 2 ; - пропущен оператор присваивания двоеточие после переменной k, правильно будет k := 1 / 2;
- Ошибка в команде n := SQR 15 * k ; - пропущены скобки вокруг числа 15, правильно будет n := SQR(15) * k;
- Ошибка в команде k := n + k ; - пропущен символ умножения "*", правильно будет k := n * k;
2. Задача 13.
Результат выполнения операторов:
n := 15;
k := 1 / 2;
n := SQR(15) * k;
k := n + k;
Writeln ("n =", n:8:2);
Writeln ("k = ", k:9:3);
После выполнения этих операторов на экран будет выведено:
n = 337.5
k = 337.5
3. Задача 13.
Программа для решения задачи:
program average;
var
a, b, avrg: real;
begin
Write("Введите первое число: ");
Readln(a);
Write("Введите второе число: ");
Readln(b);
avrg := (a + b) / 2;
Writeln("Среднее арифметическое: ", avrg:0:2);
end.
Объяснение:
- В программе объявляются переменные a, b и avrg для хранения двух чисел и среднего арифметического.
- С помощью функции Readln пользователь вводит два действительных числа.
- Затем, используя формулу среднего арифметического (avrg := (a + b) / 2), вычисляется среднее значение.
- Результат выводится с помощью функции Writeln.
- После выполнения программы на экран будет выведено среднее арифметическое двух чисел.
Знаешь ответ?