Информатика | студенческий
Разработать приложение, в котором запретить ввод с клавиатуры цифр и знаков препинания «.
», «, », « : », « - » в поле Edit.
При повторном вводе разрешенных символов выдавать сообщение «Символ уже введен!
» На делфи.
Объём сообщения состовляет 50 байтТекстовое сообщение содержит 80 символовСколько букв алфавита было использовано?
Объём сообщения состовляет 50 байт
Текстовое сообщение содержит 80 символов
Сколько букв алфавита было использовано?
Помогите.
- связь между размером алфавита и информационным весом символа?
- связь между размером алфавита и информационным весом символа.
Информатика, ПитонБоря играет в усложнённый «морской бой»?
Информатика, Питон
Боря играет в усложнённый «морской бой».
В клетках он пишет, сколько у корабля пушек.
Если пушек нет, он ставит 0.
Дано поле из цифр, а в конце строка "стоп".
Выведи общее количество пушек на всех кораблях.
Ввод Вывод
10001 10
01010
00400
01010
стоп.
Статья содержит 48 страниц по 40 строк по 40 символов в каждой символ кодируется 16 битами, определить размер статьи в килобайтах?
Статья содержит 48 страниц по 40 строк по 40 символов в каждой символ кодируется 16 битами, определить размер статьи в килобайтах.
Задача 1?
Задача 1.
Алфавит содержит 512 различных символов.
Сколько байт весит один знак такого алфавита?
Определите информационный объём сообщения из 1024 символов этого алфавита (в битах и байтах)?
Задача 2.
Количество информации в сообщении, содержащем 4096 символов, составляет 1 / 256Мб.
Определите мощность алфавита, с помощью которого записано это сообщение.
Задача 3.
Количество информации в сообщении, содержащем 2048 символов, составляет 8 Кб.
Определите мощность алфавита, с помощью которого записано это сообщение.
Строго на Python?
Строго на Python!
Вводится координаты точки на плоскости х и у.
Определить, попадает ли точка в заштрихованную часть.
Даны три числа a, b, с?
Даны три числа a, b, с.
Найти их среднее арифметическое(сумму чисел разделить на их количество).
С клавиатуры вводится число a, количество килобайт.
Переведите это число в байты, биты и мегабайты и выведите значения на экран.
.
Идёт ввод натуральных чисел?
Идёт ввод натуральных чисел.
Если было введено не натуральное число, то команда останавливается и в выводе появляется наибольшее четное число из ранее введенных либо если не было введено ни одного натурального числа, то в выводе должна быть надпись "Чётных чисел нет" или что - то похожее
программа python
с помощью цикла while.
1) Определи мощность алфавита, если информационный вес одного символа равен 6 бит Ответ : 2) На компьютере напечатали сообщение, состоящее из 40 символов?
1) Определи мощность алфавита, если информационный вес одного символа равен 6 бит Ответ : 2) На компьютере напечатали сообщение, состоящее из 40 символов.
Определи информационный объём сообщения в байтах.
Помогите пжж.
Координатным устройством ввода информации является :тачпадакустические колонкисканер?
Координатным устройством ввода информации является :
тачпад
акустические колонки
сканер.
Вы находитесь на странице вопроса Разработать приложение, в котором запретить ввод с клавиатуры цифр и знаков препинания «? из категории Информатика. Уровень сложности вопроса рассчитан на учащихся студенческий. На странице можно узнать правильный ответ, сверить его со своим вариантом и обсудить возможные версии с другими пользователями сайта посредством обратной связи. Если ответ вызывает сомнения или покажется вам неполным, для проверки найдите ответы на аналогичные вопросы по теме в этой же категории, или создайте новый вопрос, используя ключевые слова: введите вопрос в поисковую строку, нажав кнопку в верхней части страницы.
Ответ :
для события Edit1KeyPress прописать код : / / - - - - - - - - - - - - - - - - - - - - - - - -
procedure TForm1.
Edit1KeyPress(Sender : TObject ; var Key : Char) ;
var islegal : bool ;
begin ; Label1.
Caption : = '' ; ; if Key in ['0'.
'9'] + ['.
'] + [', '] + [' : '] + [' - '] then islegal : = false ; ; if pos(Key, Edit1.
Text) < ; > ; 0 then ; begin ; ; Label1.
Caption : = 'Символ уже введен!
' ; ; ; islegal : = false ; ; end ; ; if not(islegal) then Key : = #0 ;
end ; / / - - - - - - - - - - - - - - - - - - - - - - - -
Вложил готовый проект, только нужно .
Txt переименовать в .
Zip
Сайт не дает прикреплять архивы
Объяснение :