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

Дан ip-адрес, выбери и запиши верные ответы. ip-адрес 180.41.114.187 компьютера относится к сети класса , адрес компьютера в сети . , а — это адрес компьютера пользователя.

Показать ответ
Ответ:
gubkaBob216
gubkaBob216
22.05.2021 01:21

Так как понятие "гласная", "согласная" и пр. не являются формализованными понятиями, то есть их нельзя вычислить алгоритмически, их нужно задавать таблично, константами, а так как их много, то лучше всего подойдут массивы.

Так как не указан язык программирования, в котором нужно реализовать текст, напишу на некоем псевдоязыке, текст которого легко переводится на известный тебе язык.

 

В общем, программа будет такой

 

// объявления массивов

гласная(), согласная(), знак()

// заполнение массивов

гласная(1)="А";

гласная(2)="а";

гласная(3)="Е";

гласная(4)="е";

согласная(1)="Б";

согласная(2)="б";

согласная(3)="В";

согласная(4)="в";

знак(1)=".";

знак(2)=".",;

знак(3)="!";

знак(4)="?";

  // Функции

функция фГласная(буква)  

 Для ц=1 по кг Цикл  

     Если буква=гласная(ц) тогда

             Возврат(1);  

     КонецЦикла;  

 КонецЦикла;  

 Возврат(0);

КонецФункции  

 

функция фСогласная(буква)  

 

КонецФункции  

функция фзнак(буква)  

 

КонецФункции

  // текст основной программы

Ввод(буква);

Если фГласная(буква) = 1 тогда

   Сообщить(буква+" гласная");  

ИначеЕсли  фСогласная(буква)=1

тогда             Сообщить(буква+" согласная");  

ИначеЕсли фЗнак(буква)=1 тогда      

 Сообщить(буква+" разделительный знак");

Иначе        Сообщить(буква+" не квалифицирована");

КонецЕсли;  

 

  Вот собственно и всё.  

Замечание1

Если язык требует при объявлении массива его размерность- её нужно указать. многие языки имеют встроенную функцию определения размерности, некоторые языки имеют встроенные функции поиска в массиве, тогда нужно воспользоваться ими, а не писать свои функции.

Замечание2

Если ИначеЕсли... как правило реализуется операторами Case

Замечание3

Основная программа, как правило тоже обрамляется циклом с выходом по условию, которое либо системное либо некий хитрый символ(или клавиша), который ты определяешь концом ввода данных.

Замечание4

Вместо массив можно использовать строки, содержащие подряд буквы, например, гласная="АаЕеИи". в этом случае для поиска нужно пользоваться соответствующими встроенными строковыми функциями.

  В общем, смысл должен быть тебе понятен, а дальше - творчество.

Успехов!  

Почему-то при записи убежал возврат каретки, попробовал восстановить. :)

    

0,0(0 оценок)
Ответ:
орех15
орех15
04.04.2020 07:37
Программа на языке PascalABC

program raf105;

var abc,ab,bc:integer;

begin

write('Введите трёхзначное число: ');

readln(abc);

ab:= abc mod 100;

bc:= abc div 10;

if ab = bc

 then writeln('Число состоит из одинаковых цифр')

 else writeln('Число не состоит из одинаковых цифр');

end.

Объяснение

Для выполнения задачи достаточно найти первые 2 цифры и последние 2 цифры если они равны, то число состоит из одинаковых цифр

abc mod 100 Убирает все сотни из числа.

Например было число 123, стало 23.

482 стало 82

abc div 10 Считает сколько в числе целых десяток, но не считает остаток.

Например было число 123, стало 12

482 стало 48

Сравнивание 2 первых и 2 последних цифр

253      25 и 53 не равны, значит число не состоит из одинаковых цифр

121       12 и  21 не равны, значит число не состоит из одинаковых цифр

111        11 и 11  равны, значит число состоит из одинаковых цифр

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота