What will be the value of the expression a[-a[a[3]-2]]+a[-a[a[3]]] when x=2, if the elements of array A (a[1], a[2], a[3], a[4]) are respectively x, -x, x 2, -x 2? 4. Given the descriptions: Type Ora = 0..23; Grade = -40..40; Temperatura = array [Ora] of Grade; Var t: Temperatura; The components of variable t represent the temperature values, measured every hour during 24 hours. Write a program that: - calculates the average temperature; - determines the number of days with temperature below zero. 5. Using the array data type, write a program that implements the Eratosthenes algorithm.
Журавль
Задача 1:
Для решения данной задачи необходимо разобрать выражение:
a[-a[a[3]-2]] + a[-a[a[3]]]
Подставляем значения элементов массива A вместо переменных:
a[1] = 2, a[2] = -2, a[3] = 4, a[4] = -4
Теперь можем вычислить значение выражения:
a[-a[a[3]-2]] + a[-a[a[3]]] = a[-a[4-2]] + a[-a[4]] = a[-a[2]] + a[-4] = a[-2] + (-4) = -2 + (-4) = -6
Ответ: значение выражения a[-a[a[3]-2]] + a[-a[a[3]]] при x=2 равно -6.
Задача 2:
Напишем программу, которая решает данную задачу:
Программа запрашивает у пользователя значения температуры каждый час в течение 24 часов. Затем суммирует все значения и находит среднее значение, а также подсчитывает количество дней с температурой ниже нуля. Результат выводится на экран.
Задача 3:
Программа, реализующая алгоритм Эратосфена:
Программа находит и выводит все простые числа от 2 до N (в данном случае N равно 1000) с использованием алгоритма Эратосфена. Алгоритм проверяет все числа от 2 до N и вычеркивает все их кратные, оставляя только простые числа. Результат выводится на экран.
Решение №2 и №3 представлены в виде программ на языке Паскаль. Эти программы могут быть скомпилированы и запущены для получения результата.
Для решения данной задачи необходимо разобрать выражение:
a[-a[a[3]-2]] + a[-a[a[3]]]
Подставляем значения элементов массива A вместо переменных:
a[1] = 2, a[2] = -2, a[3] = 4, a[4] = -4
Теперь можем вычислить значение выражения:
a[-a[a[3]-2]] + a[-a[a[3]]] = a[-a[4-2]] + a[-a[4]] = a[-a[2]] + a[-4] = a[-2] + (-4) = -2 + (-4) = -6
Ответ: значение выражения a[-a[a[3]-2]] + a[-a[a[3]]] при x=2 равно -6.
Задача 2:
Напишем программу, которая решает данную задачу:
program Temperature;
type
Ora = 0..23;
Grade = -40..40;
Temperatura = array [Ora] of Grade;
var
t: Temperatura;
i, sum, count: integer;
begin
sum := 0;
count := 0;
for i := 0 to 23 do
begin
write("Введите значение температуры в ", i, " час: ");
readln(t[i]);
sum := sum + t[i];
if t[i] < 0 then
count := count + 1;
end;
writeln("Средняя температура: ", sum / 24);
writeln("Количество дней с температурой ниже нуля: ", count);
end.
Программа запрашивает у пользователя значения температуры каждый час в течение 24 часов. Затем суммирует все значения и находит среднее значение, а также подсчитывает количество дней с температурой ниже нуля. Результат выводится на экран.
Задача 3:
Программа, реализующая алгоритм Эратосфена:
program Eratosthenes;
const
N = 1000;
var
prime: array[2..N] of boolean;
i, j: integer;
begin
for i := 2 to N do
prime[i] := true;
i := 2;
while i * i <= N do
begin
if prime[i] then
begin
j := i * i;
while j <= N do
begin
prime[j] := false;
j := j + i;
end;
end;
i := i + 1;
end;
writeln("Простые числа от 2 до ", N, ":");
for i := 2 to N do
begin
if prime[i] then
write(i, " ");
end;
end.
Программа находит и выводит все простые числа от 2 до N (в данном случае N равно 1000) с использованием алгоритма Эратосфена. Алгоритм проверяет все числа от 2 до N и вычеркивает все их кратные, оставляя только простые числа. Результат выводится на экран.
Решение №2 и №3 представлены в виде программ на языке Паскаль. Эти программы могут быть скомпилированы и запущены для получения результата.
Знаешь ответ?
О проекте
Мы такая же школота как ты ;)
Предметы
Русский язык- Математика
- Геометрия
- Музыка
- История
- Экономика
- Литература
- Алгебра
- Другие предметы
- Физика
- Информатика
- Обществознание
- География
- Немецкий язык
- Химия
- Английский язык
- Психология
- Українська мова
- Окружающий мир
- Биология
- Беларуская мова
- Қазақ тiлi
- Право
- ОБЖ
- Українська література
- МХК
- Французский язык
