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

Списать программу в тетрадь. Составить программу для нахождения S прямоугольника, и программу нахождения среднего арифметического двух чисел

Показать ответ
Ответ:
Amyy1
Amyy1
10.05.2021 11:59

Датчик сөзінің мәнін, түс датчигінің түс, дыбыс, жарық-сәуле, температура, жылдамдықты өлшейтінін біледі; Датчиктердің қызметіне қарай 4 түрге бөлінетінін анықтайды.

Роботтың тірі организм принциптеріне негізделіп жасалатын автоматты құрылғы екенін біледі. .

Оқушылардың басым бөлігі: Түс датчигіндегі жарық деңгейін анықтайтын 8 түрлі түстің кодын біледі. Негізгі оқу-жаттығу роботының атын біледі;

Кейбір оқушылар: Түс датчигінің екі түрге электронды және механикалық болып бөлінетінін, оның үш режимін: Түс режимін, Шағылысқан жарық жарықтылығы, Сыртқы жарық жарықтылығы режимдерін біледі. LEGO MINDSTORMS EDUCATION EV3 программасын аша алады. Программа мәзірінен Нұсқаулықпен (Инструкция) танысып, роботтың құрастырылуын біледі.

0,0(0 оценок)
Ответ:
17Стася17
17Стася17
04.04.2022 11:40

1) Пароль в этом коде - "zn4n1j4". Заменить при необходимости.

var

 i: integer;

 s: string;


begin

 i := 1;

 while i <= 5 do

 begin

   readln(s);

   if s = 'zn4n1j4' then

   begin

     writeln('Вход в систему разрешен');

     exit;

   end;

   writeln('Неверный пароль.');

 end;

 writeln('Пароль не был угадан 5 раз.');

end.


2) Используем операцию x mod 10 для получения последней цифры числа и x div 10 для "отбрасывания" последней цифры числа.

var

 x, ans: integer;


begin

 read(x);

 ans := 0;

 while x <> 0 do

 begin

   ans := ans + (x mod 10);

   x := x div 10;

 end;

 writeln(ans);

end.

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