Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
anncopper
14.12.2021 05:55 •
Информатика
Программа евклида в паскаль где нод 40 и 64
Ответ:
Инга1702
07.09.2020 19:25
PROGRAM P_1;
VAR
A,B: INTEGER;
BEGIN
A:=40;
B:=64;
REPEAT
IF A>B THEN A:=A-B
ELSE B:= B-A;
Until A=B;
WRITELN ('NOD = ' , A);
END.
0,0
(0 оценок)
Популярные вопросы: Информатика
ооа10
02.02.2020 12:58
Укажите, какое количество информации в байтах несёт данное сообщение ! ? ( 32-символьный алфавит)...
zvezda026
02.02.2020 12:58
Нужно 2301 перевести в двоичную систему...
panda4918
02.02.2020 12:58
Вкомпьютере часто каждый символ кодируется 8 битами. статья,набранная на компьютере содержит 10 страниц на каждой странице 32 строки в каждой строке 64 символа.определите...
Otahalepi
02.02.2020 12:58
Нужно перевести 323 в двоичную систему...
lspkorvo
02.02.2020 12:58
Напишите программу на с++, нужно. вася, петя и коля играли в теннис навылет (проигравший пропускал следующую партию, уступая свое место третьему). вася утверждает, что сыграл...
Нznm
24.04.2020 13:44
Что должно было присутствовать у игрока на олимпийских играх?...
KellenPack
15.06.2020 02:04
. Из представленных предложений выпишите подлежащие. 1. Остров закрывала завеса утреннего густого тумана. 2. Но вдруг солнце ударило по нему золотыми мечами. 3. Туман быстро...
polinalopareva1
05.09.2020 12:57
ответи на вопросы 1 и 2 1 Почему льняные ткани прочнее , чем хллопчатобумажные? 2 Почему льяные ткани осыпаются сильнее, чем хлопчатобумажные?...
Атмир089997
20.03.2022 02:16
2. Укажите группу слов, в которых неправильно выделен префикс. А предгрозовой, предложение, предвидетьБ предобрый, предорогой, предолгийВ предобеденный, предударный, предоктябрьскийГпредостеречь,...
Птичка220903
26.02.2023 15:21
4.Які галузі господарства забезпечують країнам Західної Європи глобальну конкуренцію у ХХІ столітті?А) важка промисловість, тваринництво, морський та трубопровідний транспортБ)...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
VAR
A,B: INTEGER;
BEGIN
A:=40;
B:=64;
REPEAT
IF A>B THEN A:=A-B
ELSE B:= B-A;
Until A=B;
WRITELN ('NOD = ' , A);
END.