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

Екы спритыны салыстырыныз уксастыгы мен айырмашылыгы неде екенын жазыныз

Показать ответ
Ответ:
Moon133
Moon133
11.12.2020 09:51

Код:

1.program HappyTicket;

2.var

3.n, a: longint;

4.left, right, digits, i: byte;

5.begin

6.readln(n);

7.a := n;

8.digits := 0;

9.while a <> 0 do begin

10.a := a div 10;

11.inc(digits)

12.end;

13.left := 0;

14.right := 0;

15.for i := 1 to digits div 2 do begin

16.right := right + n mod 10;

17.n := n div 10

18.end;

19.if odd(digits) then n := n div 10;

20.for i := 1 to digits div 2 do begin

21.left:= left + n mod 10;

22.n := n div 10

23.end;

24.writeln(left = right)

25.end.

Представим, как должен работать алгоритм при вводе числа 14350:

1)      Считаем длину числа, она равна 5 (строки 11-14);

2)      В цикле из 5 div 2 = 2 повторений прибавляем к right крайние справа цифры 0 и 5, после чего отбрасываем их и имеем в n 143 (строки 17-20);

3)      Так как odd(digits) = odd(5) = true, отбрасываем 3, после чего имеем в n 14 (строка 21);

4)      В цикле из 5 div 2 = 2 повторений прибавляем к left оставшиеся цифры 1 и 4, после чего n становится равно 0, что, впрочем, нас уже не интересует (строки 22-25);

5)      Выводим на экран значение выражения left = right – ответ положительный (строка 26)

Объяснение:

Для ее решения необходимо знать длину числа (то есть его разрядность), вследствие чего нам необходимо скопировать переменную n в некоторую другую (например, a), чтобы на основе a посчитать количество десятичных разрядов n и сохранить его в некоторой переменной digits. Сделать это можно так:

a := n;

digits := 0;

while a <> 0 do begin

a := a div 10;

inc(digits)

end;

0,0(0 оценок)
Ответ:
zamanova05
zamanova05
24.07.2021 13:24

1) В России отмечается день Интернета 30 сентября.

Компанией «IT Infoart Stars» фирмам и организациям было разослано предложение поддержать собственную инициативу, состоящую из нескольких пунктов: назначить 30 сентября «Днём Интернета», ежегодно его праздновать и провести 30 сентября 1998 года «перепись населения русскоязычного Интернета». По данным переписи, в 1998 году доступ к Интернету имел миллион россиян. Впервые российский День Интернета отметили в московском «Президент-отеле» с участием двухсот человек, в число которых входили представители крупных провайдеров, компьютерных фирм и информационных агентств.

2) В 1649 году появилось ванильное мороженое — его придумал французский кулинар Жерар Тирсен. Оригинальный рецепт замороженного ванильного крема – из молока и сливок. Новинку назвали «неаполитанским мороженым». После этого рецептура ледяного десерта обновлялась постоянно. А на Руси замороженное молоко ели в жару еще в древности. После этого рецептура ледяного десерта обновлялась постоянно — появлялись все новые и новые сорта. Широкая общественность узнала рецепт благодаря Прокопио де Колтелли, который открыл первое кафе-мороженое в Париже.

3) История возникновения первого шоколада начинается свыше трёх десятков веков назад на низменности мексиканского залива. Там жили индейцы ольмеки. Учёные предполагают, что этимология слова «какао» берёт начало с этого народа. Ольмеки впервые использовал в разговоре «kakawa». Так поселенцы именовали напиток на холодной воде с толчёными бобами какао.

4) Самая яркая звезда на небе - это Сириус из созвездия Большого Пса.  Видимая звёздная величина Сириуса равна -1,46m.

5) По версии гидрологов, море называется Черным потому, что любые металлические предметы, опущенные на большую глубину, поднимаются на поверхность почерневшими. Причина - сероводород, которым насыщена черноморская вода на глубине более 200 м.

6) Самая маленькая страна в мире – это Ватикан. Это государство наименьшее в мире по площади и по количеству граждан. Страна находится внутри Рима, столицы Италии. Здесь расположена резиденция главы Католической церкви, Папы Римского. Поэтому миниатюрный город-государство является духовным центром для всего католического мира.

7) Летние Олимпийские игры 1896 года — первые современные летние Олимпийские игры — проходили с 6 по 15 апреля в Афинах, Греция.

Традиция проведения Олимпийских игр, существовавшая в Древней Греции, зародилась как часть религиозного культа. Игры проводились с 776 года до н. э. по 393 год н. э., всего было проведено 293 Олимпиады в Олимпии, считавшейся у греков священным местом. От Олимпии произошло и название игр.

Надеюсь Удачки!))

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