Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
kiorav
29.06.2020 14:03 •
Информатика
Преобразуй единицу измерения информации
40960 бит=
Кбайт.
👇
Увидеть ответ
Ответ:
SashaZanevskaya
29.06.2020
ответ: 5,12 КБайт
Объяснение: 40960:8000=5,12
4,6
(65 оценок)
Открыть все ответы
Ответ:
rewington1
29.06.2020
#include <iostream>
#include <fstream>
int main()
{
setlocale(LC_ALL, "RUSSIAN");
std::ofstream file("file.txt");
int cr=0;
int max = 0;
int count = 0;
do
{
std::cout << "Введите число >> ";
std::cin >> cr;
if (cr > max)
max = cr;
if(cr!=421)
file << cr << std::endl;
count++;
} while (cr != 421);
file << "Количество введенных чисел: " << count << std::endl;
file << "Максимальное введенное число: " << max << std::endl;
}
4,4
(70 оценок)
Ответ:
ushelemet
29.06.2020
Самое худшее, что можно придумать, это сделать именно процедуру.
Ниже вариант с процедурой, а потом другой, без процедур. Можно сравнить...
// PascalABC.NET 3.2, сборка 1509 от 27.07.2017
// Внимание! Если программа не работает, обновите версию!
Вариант с процедурой
procedure MassAvg(var r:real);
begin
r:=ReadSeqInteger('Вводите:',ReadInteger('n=')).Average
end;
begin
var avg:real;
for var i:=1 to 3 do begin
MassAvg(avg);
Writeln('Среднее значение: ',avg)
end
end.
Вариант без процедур и функций
begin
for var i:=1 to 3 do begin
Writeln('Среднее значение: ',
ReadSeqInteger('Вводите:',ReadInteger('n=')).Average)
end
end.
Результат
n= 7
Вводите: -5 4 11 8 0 5 4
Среднее значение: 3.85714285714286
n= 5
Вводите: 100 32 52 43 19
Среднее значение: 49.2
n= 4
Вводите: 6 6 8 7
Среднее значение: 6.75
4,4
(28 оценок)
Это интересно:
Д
Дом-и-сад
09.03.2020
Как правильно очистить деревянную поверхность и сохранить её красоту на долгие годы?...
В
Взаимоотношения
17.05.2021
Как правильно флиртовать с Раками: знак зодиака и любовные отношения...
03.03.2023
Как пригласить девочку на свидание в пятом классе...
И
Искусство-и-развлечения
30.04.2020
Как стать сопрано, если вы альт (для девушек)...
Х
Хобби-и-рукоделие
31.03.2023
Чистка масляных картины: все, что нужно знать, чтобы сохранить ее надолго...
К
Кулинария-и-гостеприимство
02.01.2021
Как устроить первоклассную вечеринку...
Д
Дом-и-сад
04.01.2022
Солнечная энергия: идеальное решение для подогрева бассейна...
К
Компьютеры-и-электроника
30.11.2021
Apple Macintosh или другие ПК: как определиться с выбором...
Х
Хобби-и-рукоделие
06.03.2020
Как правильно драпировать платье: советы стилистов и примеры вариантов...
И
Искусство-и-развлечения
21.05.2021
Как играть в бильярд как профи?...
Новые ответы от MOGZ: Информатика
goldenrosemaryk
07.06.2020
Составьте таблицы истинности для следующих функций:...
ксения1373
05.02.2022
1.В каком случае применяется оператор выбора if? применить оператор выбор 2. Когда предпочтительнее применять оператор выбора switch? 3. Объясните, как работает структура оператора...
vitalik6300
12.06.2020
Сколько мегабайт информации содержит сообщение объемом 225 бит? 1) 4; 2) 8; 3) 3; 4) 32. Дали контрольную, но я думаю, что тут нет правильного ответа. Так ведь?...
Nikitosqwerty
20.05.2022
Что будет, если скопировать объект с анимацией и вставить его на этот же слайд? а) новый объект не будет отличаться от исходного, настройки анимации не изменятся б) новый объект...
shutnick121
11.02.2023
Написать программу на языке С (массивы) 1.Посчитать количество элементов массива, меньших 45 2.Найти среднее арифметическое элементов массива, меньших...
24vwyda
06.11.2020
Решите Паскаль k:=1 min:A=[1] for i:=2 to 100 do if A[i] k:=i...
KsushaTrefilova
31.01.2022
Задача на составление программы на языке Pascal. Вычислить сумму и число элементов матрицы A[6x6], находящихся под главной диагональю...
vladavlada60
27.08.2020
выполнить задания №1,2,5,6...
olena4519
28.01.2023
Для логического выражения нарисуйте соответствующую ему электронную схему. Выясните, какой сигнал должен быть на выходе электронной схемы при каждом возможном наборе сигналов...
friskdrimur
13.09.2021
Что такое текстовый редактор? * Программа для работы с таблицами Прикладная программа, которая позволяет создавать, редактировать и печатать текстовые документы Программа, предназначенная...
MOGZ ответил
Составить рассказ повествовательный..по картинкам где нарисован 1рисунок-кот...
Составить 3 вопроса к предложению knitting is a quiet hobby...
Докажите, что у равных треугольника авс и а1в1с1 биссектрисы, проведенные...
Помгите ): вычислите удобным...
Сочинение по языку на тему язык мы его теряем?...
Сколько диоганалей можно провести из вершины выпуклого многоугольника, если...
Діагональ куба дорівнює 3 кореня із 3 см.знайти об єм ....
Найдите среднее арифметическое чисел: 25,6 , 28,7 , 14,4 , 12,8....
Решить уравнение: log числа 288 по основанию 8 - log числа 4,5 по основанию...
На залізничну платформу навантажили 3 однаковіх легкових автомобілі і 4 мотоцикли.загальна...
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ
Оформи подписку
О НАС
О нас
Блог
Условия пользования
Авторское право
Политика конфиденциальности
Предпочтения cookie-файлов
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
App
Вход
Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ
ответ: 5,12 КБайт
Объяснение: 40960:8000=5,12