Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
shoistakarimova
12.03.2023 19:25 •
Информатика
На code blocks !
дано натуральное число n. найти сумму и произведение нулевых цифр этого числа
👇
Увидеть ответ
Открыть все ответы
Ответ:
lllgglll
12.03.2023
Const
n = 10;
var
a: array[0..10] of integer;
i, s: integer;
begin
//Заполнение массива сл. числами
for i := 1 to n do
begin
a[i] := random(201) - 100;
write(a[i]:4);
end;
writeln;
//1) Все элементы не превышающие число 100
writeln('Не больше 100 ');
for i := 1 to n do
if a[i] <= 100 then
write( a[i]:4);
writeln;
// 2) Все четные элементы
writeln('Кратные двум ');
for i := 1 to n do
if a[i] mod 2 = 0 then
write( a[i]:4);
writeln;
// 3) Все элементы, являющиеся трехзначными числами
writeln('Трехзначные ');
for i := 1 to n do
if (a[i] < -99) or (a[i] > 99) then
write(a[i]:4);
writeln;
// 4) Третий, шестой и т.д элементы.
i := 3;
writeln(' номера 3, 6, 9 и т.д.');
while i < n do
begin
write(a[i]:4);
i := i + 3;
end;
end.
4,8
(27 оценок)
Ответ:
LinaLafe
12.03.2023
Для решения определим
1. Время передачи по высокоскоростному каналу
2. Время передачи по низкоскоростному каналу
3. Время для получения первых 1024 Кб
4. Всё сложим.
2^20 бит/с = 2^20 / 8 / 1024 Кбайт/с = 2^20 / 2^3 / 2^10 = 2^7 Кбайт/с
2^13 бит/с = 2^13 / 8 / 1024 Кбайт/с = 2^13 / 2^3 / 2^10 = 2^0 = 1 Кбайт/с
10 Мб равно 10*1024 Кбайт = 10*2^10 Кбайт.
По высокоскоростному каналу файл будет передаваться
(10*2^10) / 2^7 = 10*2^3 = 80 секунд
По низкоскоростному каналу файл будет передаваться
(10*2^10) / 1 = 10*2^10 = 10240 секунд.
Первые 1024 Кбайт будут передаваться
2^10 / 2^7 = 8 секунд
Общее время 80+10240+8 = 10328 секунд.
4,6
(17 оценок)
Это интересно:
К
Кулинария-и-гостеприимство
31.01.2022
Огурец - искусство нарезки...
С
Стиль-и-уход-за-собой
25.11.2021
Как легко и быстро растянуть обувь на каблуках?...
К
Кулинария-и-гостеприимство
30.08.2020
Как использовать конвекционную тостер-печь: настоящий гид для начинающих...
З
Здоровье
13.03.2023
10 уникальных советов о том, как помочь выздороветь близкому человеку...
Ф
Финансы-и-бизнес
13.02.2022
Как эффективно вести учет дебиторской задолженности?...
02.09.2021
Как пережить плохую оценку: навыки управления эмоциями и продуктивной работы на ошибке...
К
Компьютеры-и-электроника
20.11.2022
Как быстро установить Qt SDK на Ubuntu Linux:...
И
Искусство-и-развлечения
05.05.2022
Как сделать костюм единорога: пошаговая инструкция...
Х
Хобби-и-рукоделие
04.06.2022
Голова манекена: как сделать её самому?...
К
Компьютеры-и-электроника
14.03.2021
Как получить навык Водопад в игре Покемон Изумруд: полное руководство...
Новые ответы от MOGZ: Информатика
fFlower337
09.04.2021
Нужно сделать презентацию типа теста по (алгебре,русскому языку,информатике),что б вопросы были не очень сложными с гиперссылками ,заранее ....
shutnick121
10.07.2022
с информатикой❗❗❗ Нужно выполнить 1 упражнение под номером 2.И выполнить 2 упражнение под номером 1. ...
Tima66666666
03.08.2022
Дописать программы 1. вывести на экран сумму 5 и 3 как чисел и как символов 2. вывести на экран код введенного с клавиатуры символа....
Sofochka1309
20.01.2021
Отметь неопределенное высказывание: а) погода хорошая б) все двери сделаны из дерева в) 40+10=50...
Princess040205
20.01.2021
Какие каналы связи используются для передачи данных в компьютерных сетях?...
nastyakarmazina1
27.03.2023
Создать массив а из десяти целых чисел, принадлежащих промежутку (0; 50) выведите полученный результат на экран. подсчитать сумму элементов (работа в паскаль). я просто...
Dog7771
27.03.2023
Написать программу выводящую на печать дробную и целую части числа вводимого с клавиатуры....
Ofsi
04.07.2021
Выбери верный ответ. чему равно высказывание c : «16 — отрицательное число». все ответы верные нет верного ответа c = 0 c = 1 c = 16...
Lopidon11
14.02.2022
Составьте таблицу истинности для логического выражения (а^в)^а...
MuclePan
18.05.2023
Для узла с IP-адресом 193.138.70.47 адрес сети равен 193.138.64.0. Найдите наибольшее возможное количество единиц в двоичной записи маски подсети....
MOGZ ответил
Столыпиндік аграрлық реформасының нәтижесінде қазақтардан 1893...
Из текста произведения я узнал, что...
ЖАЗЫЛЫМ 8 -тапсырма. Берілген сөздерді жекеше түрде тәуелдеп жаз:...
По глубине слоя определяют возраст артефакта: чем ближе к поверхности...
УМОЛЯЮ ВАС ЧЕРЕЗ 10 МИН УРОК Я ВАС ПРОЩУ Задание 1 ( ). Прочитайте....
Р Работа с таблицей: Используя материал учебника и дополнительную...
Би мен шешенге тән ортақ қасиеттер...
Простые Моносахариды это определение...
Информатика. Написать код на Python. Нужно решить три задачи ,...
35А. Запиши данные существительные в таблицу. Существительные каких...
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ
Оформи подписку
О НАС
О нас
Блог
Условия пользования
Авторское право
Политика конфиденциальности
Предпочтения cookie-файлов
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
App
Вход
Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ
n = 10;
var
a: array[0..10] of integer;
i, s: integer;
begin
//Заполнение массива сл. числами
for i := 1 to n do
begin
a[i] := random(201) - 100;
write(a[i]:4);
end;
writeln;
//1) Все элементы не превышающие число 100
writeln('Не больше 100 ');
for i := 1 to n do
if a[i] <= 100 then
write( a[i]:4);
writeln;
// 2) Все четные элементы
writeln('Кратные двум ');
for i := 1 to n do
if a[i] mod 2 = 0 then
write( a[i]:4);
writeln;
// 3) Все элементы, являющиеся трехзначными числами
writeln('Трехзначные ');
for i := 1 to n do
if (a[i] < -99) or (a[i] > 99) then
write(a[i]:4);
writeln;
// 4) Третий, шестой и т.д элементы.
i := 3;
writeln(' номера 3, 6, 9 и т.д.');
while i < n do
begin
write(a[i]:4);
i := i + 3;
end;
end.