Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
юра416
03.05.2021 04:25 •
Информатика
Составить прогу, которая вычисляет среднюю скорость катера по результатам измерения в 6 пунктах. ( в массиве констант 87км/ч, 68 км/ч, 82,7 км/ч, 91 км/ч, 86 км/ч, 67,5 км/ч). составьте, , буду признателен.
Показать ответ
Ответ:
ivancornij8
09.09.2020 09:50
Begin readarrreal(6).Average.ToString.Println; end.
"Школьный вариант":
const
N = 6;
var
i: integer;
ar: array[1..N]of real;
s: real;
begin
s := 0;
for i := 1 to N do
begin
read(ar[i]);
s := s + ar[i];
end;
write(s / 6);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
alexkraskina
02.03.2022 14:52
Напишите программу с использование алгоритмической конструкции повторение и процедуры пользователя для исполнителя Робот. Исходное положение исполнителя и исполнителя Робот....
SALATIN11
29.08.2021 09:47
информатика если можно, то полное решение)...
варечканяшечка
21.07.2022 10:01
У СТЕПУнаписати твір по плану,1)зупинка у степу,2)приготування страви,3)смачний обід4)ворогив у степу5)кінь помчав до лісу...
77Джи77
11.11.2022 08:05
На вход с клавиатуры подаются числа (по одному). Нужно вывести на экран сумму всех четных чисел. Ввод прекращается, если введена пустая строка ( ). При любой ситуации, когда...
ybrybrybrybrrby
28.09.2022 01:36
Запишите число, которое будет напечатано в результате выполнения следующей программы. Для Вашего удобства программа представлена на пяти языках программирования....
Nikita45Russia
03.03.2021 15:59
Диагональ AC делит прямоугольную трапецию ABCD на два треугольника - прямоугольный и равносторонний. Найдите среднюю линию трапеции, если не меньшее основание равно 12 см....
Nikitos228456
03.03.2021 15:59
Почему производители духов всегда говорят, что активное действие духов начинается только спустя некоторое время после нанесения на кожу?...
mainura2006
03.03.2021 15:59
Fill in the correct pronouns. Example: My sister Jane loves books. This novel is for (she) Her. [1]1. My brother likes Disney films. The video is for (he). [1]2. My friends collect...
Dara005
03.03.2021 15:59
Определите электронную формулу, соответствующию иону S2-. A) 1s 22s2p63s23p5B)1s22s22p6C)1s22s22p6D)1s22s2p63s23p...
arminqamalyan85
16.10.2022 18:14
Кто был первым князем древнегреческого государства...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
"Школьный вариант":
const
N = 6;
var
i: integer;
ar: array[1..N]of real;
s: real;
begin
s := 0;
for i := 1 to N do
begin
read(ar[i]);
s := s + ar[i];
end;
write(s / 6);
end.