Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
tolodono
16.07.2022 14:31 •
Информатика
Вычислить скалярное произведение векторов a и b в восьмимерном пространстве. программа паскаль. массивы
Ответ:
муха68
08.10.2020 20:57
// PascalABC.NET
// Версия 3.3.5 сборка 1662 (29.04.2018)
begin
Print('Введите координаты вектора a:');var a := ReadArrInteger(8);
Print('Введите координаты вектора b:');var b := ReadArrInteger(8);
Println('Произведение:', Range(0, 7).Select(t -> a[t] * b[t]).Sum);
end.
Пример:
Введите координаты вектора a: 1 4 2 3 4 5 7 2
Введите координаты вектора b: 1 4 2 4 5 3 1 4
Произведение: 83
0,0
(0 оценок)
Популярные вопросы: Информатика
tusovki
24.01.2021 20:37
Запиши число 112 (6) в десятичной системе счисления....
kuanich
24.01.2021 20:37
Составьте программу, которая преобразует введенное с клавиатуры дробное число в денежный формат. например, число 12,348 должно быть преобразовано к виду 12 руб. 35 коп....
Katialka11
14.02.2023 20:48
Примеры известных вам алгоритмов алгоритмов и проиллюстрируйте их примерами ....
mariya260464
14.02.2023 20:48
Рота сделать из слова несколько заменяя одну букву...
Центравой
22.03.2023 03:53
. Дан массив содержащий 8 целых чисел. Массив ввести с клавиатуры вывести массив на экран в одну строку и найти произведение отрицательных элементов массива...
зулик3
04.03.2023 18:18
N=int(input()) m=int(input()) if n a=n else: a=m for chyslo in range(1,a+1): if (n%chyslo==0) and (m%chyslo==0): print(chyslo)...
danilabelinovp08mj9
14.08.2021 06:44
Интернет-это компьютерная сеть ...
AndreyMiix
12.09.2021 23:53
Общие и отличительныепризнаки окна программы и обычного окна...
AgentDaleCoop
12.09.2021 23:53
Вычислите значение следующего выражения и результат представьте в двоичной системе счисления 10₁₆+10₈*10₂...
Gonsh1240
06.04.2023 15:17
Нужно выбрать верные утверждения из списка....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// Версия 3.3.5 сборка 1662 (29.04.2018)
begin
Print('Введите координаты вектора a:');var a := ReadArrInteger(8);
Print('Введите координаты вектора b:');var b := ReadArrInteger(8);
Println('Произведение:', Range(0, 7).Select(t -> a[t] * b[t]).Sum);
end.
Пример:
Введите координаты вектора a: 1 4 2 3 4 5 7 2
Введите координаты вектора b: 1 4 2 4 5 3 1 4
Произведение: 83