Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
pchelenyok
12.02.2022 02:25 •
Информатика
Написать программу с циклов которая вводит с клавиатуры 5 дробных чисел и вычисляет их среднее арифметическое
Показать ответ
Ответ:
TJ32
04.08.2020 07:18
Uses crt;
const n=15;var a:array[1..100] of integer;i,k:byte;beginfor i:=1 to n do begina[i]:=random(9);write(a[i]:2);end;for i:=1 to n do beginif a[i]=0 thenbeginwriteln;k:=i;writeln('первый нулевой элемент i=',k);break;end;end;end.
0,0
(0 оценок)
Популярные вопросы: Информатика
superM228228
02.09.2020 02:57
Напишите нужно алгоритм решения : вывести на экран сумму четных чисел из промежутка от 2 до 100. ( паскаль)...
irlukshina
18.05.2023 15:30
Надо написать программу на паскале: имеется массив a из n целых чисел, массив b из m целых чисел . составить массив с из n+m целых чисел , таких, что вначале идут числа...
raimalqueen
02.03.2021 22:56
Составить программу . язык pascal 1. х+4/х-2 2.корень из x^2-4x-4/x-8...
tepop13
29.07.2022 04:33
Довжина двійкового колу текстового повідомлення становить 8192біти.Скільки символів мвстить цей текст? ( Викорастанне кодування ASCII ) В развернутам виде...
2001maks44
19.05.2020 05:51
очень Напишите программу на языке Паскаль для решения задачи:1. Запросить от пользователя трехзначное натуральное число.2. Разбить число на цифры. 3. Найти сумму и произведение...
Boris2006
14.05.2022 15:16
Сканируется цветное изображение размером 10х10 см. Разрешающая сканера 600 dpi и глубина цвета 16 бит. Какой информационный объем будет иметь полученный графический...
shoeva02
21.01.2021 18:32
Как нарисовать смайлик в программе QBasic???...
vika2074
07.09.2020 11:22
Решить задачи: У исполнителя Делитель две команды, которым присвоены номера: 1. раздели на 2 2. вычти 1 Первая из них уменьшает число на экране в 2 раза, вторая уменьшает...
viki157
15.12.2022 08:35
Количество пикселей: 1920000. Запиши верный ответ, округли ответ до сотых.1920000 пикселей = мегапикселей....
drgotika2011
16.09.2022 14:54
Составить алгоритм вычисления значения функции y=7x+5 при любом значении x. Надо делать в Паскаль АВС...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
const n=15;var a:array[1..100] of integer;i,k:byte;beginfor i:=1 to n do begina[i]:=random(9);write(a[i]:2);end;for i:=1 to n do beginif a[i]=0 thenbeginwriteln;k:=i;writeln('первый нулевой элемент i=',k);break;end;end;end.