В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
vadimminaev228
vadimminaev228
12.07.2022 05:22 •  Информатика

3.Чему равна мощность алфавита, используемого для записи сообщения, состоящего из 1536 символов и имеющего объем 1,5 килобайт?

Показать ответ
Ответ:
Muffs
Muffs
22.03.2021 09:59
В той же папке, где будет программа, создаете два блокнота, называете input и output
a:array[1..10000] of integer;
i, k, min, imin:integer;
begin
assign(input,'input.txt');
reset(input);
assign(output,'output.txt'); { если в тот же, то assign(input,'input.txt');
rewrite(output);                     rewrite(input);}
for i:=1 to 10 do
read(a[i]);
min:=a[1];
for i:=1 to 10 do
if min>a[i] then begin min:=a[i]; imin:=i; end;
writeln;
writeln(min,' ', imin); 
end.
задание вписать в тот же файл делаю впервые, поэтому за правильность вывода не отвечаю.
0,0(0 оценок)
Ответ:
незнакомка1232
незнакомка1232
20.01.2021 11:46
Означает примерно следующее:
После нажатия на кнопку Button1 будет проверено содержимое элементов от edit1 до edit6. Если хотя бы в одном ничего не написано, то будет выведено сообщение 'Пусті значення недопустимі' и работа программы закончится. Если все они заполнены, то
в эт-т edit7 запишется произведение чисел, нах-ся в edit1 и edit2,
в эт-т edit10 запишется число, равное , числу из edit7 /100 * 13,
в эт-т edit13 запишется число, равное разности чисел из edit7 и edit10,
в эт-т edit8 запишется произведение чисел, нах-ся в edit2 и edit5,
в эт-т edit11 запишется число, равное , числу из edit8 /100 * 13,
в эт-т edit14 запишется число, равное разности чисел из edit8 и edit11,
в эт-т edit9 запишется произведение чисел, нах-ся в edit3 и edit6,
в эт-т edit12 запишется число, равное , числу из edit9 /100 * 13,
в эт-т edit15 запишется число, равное разности чисел из edit9 и edit12,
в эт-т edit16 запишется число, равное сумме чисел из edit13, edit14 и edit15
Надеюсь, ничего не перепутал, а то прям в глазах зарябило от этого текста)))
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота