М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Supermopsmeni
Supermopsmeni
20.05.2022 13:24 •  Информатика

Напишите программу, которая в последовательности натуральных чисел вычисляет сумму всех чисел кратных 7 и оканчивающихся на 0. программа получает на вход натуральные числа, количество введенных чисел неизвестно,
последовательность чисел заканчивается числом 0 (0- признак окончания ввода, не входит в последовательность), количество чисел не превышает 1000. введенные числа не превышают 30000. программа должна вывести одно число:
сумму всех чисел, кратных 7 и оканчивающихся на 0. программу надо написать в pascal

👇
Ответ:
viktorrudnik53
viktorrudnik53
20.05.2022

Program n1;
Uses CRT;
Var s,i: integer;
begin
ClrScr;
Writeln('Введите последовательность. Для остановки введите 0 ');
Repeat
readln(i);
If (i mod 7=0)or(i mod 10=0) then s:=s+i;
until i=0;
writeln('Сумма =',s);
readln
end.

4,8(55 оценок)
Открыть все ответы
Ответ:
dicsi1
dicsi1
20.05.2022

задача2

посчитаем общее количество шариков в мешочке по формуле N=2^i

подставим в эту формулу 3 и получим двойку в третьей степени - это 8 шариков

задача3

общее количество вариантов рассчитывается по формуле  по формуле N=2^i подставим в эту формулу 16 и получим двойку в четвертой  степени т.е. i=4 бита

задача5

запишем условие: I=450 бит, К=150, i=?

решение: найдем вес одного символа , разделим I на K - получим

i=450/150=3 бита

задача9

запишем условие: I=2Кб, К=8192, N=?

решение: выразим объем информационного сообщения в битах

I=2*1024*8=16384 бит  найдем вес одного символа , разделим I на K - получим

i=16384/8192=2 бита если i=2  если вес одного символа 2, то мощность алфавита равна 4

 задача11

определим, сколько символов в алфавите планеты Альфа. Для этого вычеркнем из сообщения повторяющиеся символы: букву М, К, Н, О

осталось вот что: МКЛНОПРСТ! - всего 10 символов

определим вес 1 символа по таблице нецелых степеней числа 2: i=3.32 бита. В исходном тексте 15 символов, поэтому умножим наше i на 15

I=15*3.32=49.8 бит



4,5(89 оценок)
Ответ:
MrShkololo
MrShkololo
20.05.2022

задача2

посчитаем общее количество шариков в мешочке по формуле N=2^i

подставим в эту формулу 3 и получим двойку в третьей степени - это 8 шариков

задача3

общее количество вариантов рассчитывается по формуле  по формуле N=2^i подставим в эту формулу 16 и получим двойку в четвертой  степени т.е. i=4 бита

задача5

запишем условие: I=450 бит, К=150, i=?

решение: найдем вес одного символа , разделим I на K - получим

i=450/150=3 бита

задача9

запишем условие: I=2Кб, К=8192, N=?

решение: выразим объем информационного сообщения в битах

I=2*1024*8=16384 бит  найдем вес одного символа , разделим I на K - получим

i=16384/8192=2 бита если i=2  если вес одного символа 2, то мощность алфавита равна 4

 задача11

определим, сколько символов в алфавите планеты Альфа. Для этого вычеркнем из сообщения повторяющиеся символы: букву М, К, Н, О

осталось вот что: МКЛНОПРСТ! - всего 10 символов

определим вес 1 символа по таблице нецелых степеней числа 2: i=3.32 бита. В исходном тексте 15 символов, поэтому умножим наше i на 15

I=15*3.32=49.8 бит



4,7(26 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ