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

3. Напишите наибольшее число x, для которого истинно высказывание:
(x < 42) И НЕ (в числе x нет одинаковых цифр

Показать ответ
Ответ:
Snow241
Snow241
21.02.2022 21:38
1) Информационные ресурсы — это всякая информация, зафиксированная в любой форме, на любом материальном носителе. Все ресурсы, кроме информационного, после их многократного использования исчезают. А информационным ресурсом можно пользоваться всегда. Однако и информационные ресурсы имеют большую значимость.
2) К информационным ресурсам можно относить все научно-технические знания, произведения литературы и искусства, множество другой информации общественно-государственной значимости.
3) Для меня лучший информационный ресурс- это книги. Это касается не только школьной литературы, но и книг, которые подготавливают к будующей профессии. Большую часть своих знаний я получаю именно из них, развивая зрительную память.
Спрезентацией. или хотя бы ответить на эти вопросы, что бы я мог попробовать сделать презентацию. те
0,0(0 оценок)
Ответ:
крмоири
крмоири
27.06.2022 07:19
У if'ов небыло begin и end;
у значений массива n небыли проставленны ' ' одинарные кавычки для букв.
у b и v в условиях не те типы данных, поэтому немогут они внутрь себя вместить букву, а только цифры, исправил с integer на char.
не знаю что должна выводить программка, begin и end'ов нету и у циклов. Без begin и end'ов трудно мне просчитать что выведет программа.

Program shifer;var z,a,m,s,j,x:integer;b,v:char;k:array[1..100] of char;n:array[1..100] of char;BEGINn[1]:='а';n[2]:='б';n[3]:='в';n[4]:='г';n[5]:='д';n[6]:='е';n[7]:='ё';n[8]:='ж';n[9]:='з';n[10]:='и';n[11]:='й';n[12]:='к';n[13]:='л';n[14]:='м';n[15]:='н';n[16]:='о';n[17]:='п';n[18]:='р';n[19]:='с';n[20]:='т';n[21]:='у';n[22]:='ф';n[23]:='х';n[24]:='ц';n[25]:='ч';n[26]:='ш';n[27]:='щ';n[28]:='ъ';n[29]:='ы';n[30]:='ь';n[31]:='э';n[32]:='ю';n[33]:='я';n[34]:='а';n[35]:='б';n[36]:='в';readln(a);for m:=1 to a do  readln(b);  for j:=1 to 33 do     x:=0;    if b=n[1+x] then      begin        v:=n[1+x+3];        z:=0;        k[1+z]:=v;        z:=z+1;      end    else      begin        x:=x+1;      end;  writeln(k);END.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота