В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
gjkbyf1984
gjkbyf1984
28.06.2022 22:00 •  Информатика

В таблице Arr хранятся данные о количестве учеников в различных секциях (Arr [1] – количество учеников в первой секции, Arr [2] – во второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Var k, m: integer; Arr: array[1..10] of integer;
Begin
Arr[1] := 7; Arr[2] := 9; Arr[3] := 10; Arr[4] := 5; Arr[5] := 6; Arr[6] := 7;
Arr[7] := 9; Arr[8] := 8; Arr[9] := 6; Arr[10] := 7;
m := 0;
for k := 1 to 10 do
if Arr[k] < 6 then begin
m := m + 1 end;
writeln(m)
End.
1) Как называется структура, описанная именем Arr?
2) Что означают числа от 1 до 10, указанные в квадратных скобках []?
3) Укажите номера элементов, которые равны 7?
4) Какому значению равен 7 элемент, 10 элемент?
5) Сформулируйте на русском языке конструкцию:
if Arr[k] < 6 then m := m + 1;
6) Сколько элементов массива соответствуют этому условию?
7) Какое значение переменная m будет иметь в конце программы?

Показать ответ
Ответ:
zhenyakulakova
zhenyakulakova
31.01.2020 03:24
// тестировалось на C#.Net Framework 4.5
using System;

class Program
{
    static void Main()
    {
        int x1 = 2, y1 = 1;
        int x2 = 6, y2 = 5;
        int x3 = 10, y3 = 1;

        var a = Distance(x2, y2, x3, y3);
        var b = Distance(x1, y1, x3, y3);
        var c = Distance(x2, y2, x1, y1);

       
        Console.WriteLine("S = {0}", Square(a, b, c));
        Console.ReadKey();
    }

    //растояние между точками
    static double Distance(int x1, int y1, int x2, int y2)
    {
        return Math.Sqrt((x2 - x1) * (x2 - x1) + (y2 - y1) * (y2 - y1));
    }

    //формула герона
    static double Square(double a, double b, double c)
    {
        var p = (a + b + c) / 2;
        return Math.Sqrt(p * (p - a) * (p - b) * (p - c));
    }

    // теорема косинусов
    static double Angle(double a, double b, double c)
    {
        return Math.Acos((b * b + c * c - a * a) / (2 * b * c));
    }

    static bool IsAcuteAngel(double alpha)
    {
        return alpha < Math.PI / 2;
    }
}
0,0(0 оценок)
Ответ:
kiryushadautovp00tv7
kiryushadautovp00tv7
02.05.2021 18:17

№1

a = [int(input('Введите значение: ')) for _ in range(int(input('Введите кол-во значений: ')))]

for i in range(len(a)):

   print('индекс ', i, ', значение ', a[i], sep='')

№2

a = [int(input('Введите значение: ')) for _ in range(int(input('Введите кол-во значений: ')))]

a.reverse()

for i in range(len(a)):

   print('индекс ', i, ', значение ', a[i], sep='')

№3

import random

print([random.randrange(10, 1000) for _ in range(int(input('Введите кол-во покупок: ')))])

№4

import random

a = [random.randrange(10, 1000) for _ in range(int(input('Введите кол-во покупок: ')))]

print(a)

print('Выручка составляет', sum(a), 'рублей')

№5

import random

a = [random.randrange(10, 1000) for _ in range(int(input('Введите кол-во покупок: ')))]

print(a)

print('Выручка составляет', sum(a), 'рублей')

print('Сумма наибольшей покупки составляет', max(a), 'рублей')

print('Сумма наименьшей покупки составляет', min(a), 'рублей')

№6

import random

a = [random.randrange(1, 50) for _ in range(int(input('Введите кол-во покупок: ')))]

print('')

print('| Число | Сумма от 1 до числа |')

for i in range(len(a)):

   print('')

   print('|', a[i], ' | ', sum(range(1, a[i]+1)), ' |')

print('')

Тут можно поиграть с таблицей, чтобы было хорошо было видно, а значения верные.

№7

import random

a = [random.randrange(1, 100) for _ in range(random.randrange(10, 20))]

b = int(input('Введите ограничение: '))

q = []

print(a)

for i in a:

   if i < b:

       q += [i]

print(q)

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота