Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
ryssik
14.12.2021 18:20 •
Информатика
Программа евклида в паскаль где нод 40 и 64
Ответ:
Hkolnik32
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 оценок)
Популярные вопросы: Информатика
pozdniakova1998
03.06.2023 10:31
Как записывать число 754 в 8-ричной системе счисления в 16ричную систему счисления , ...
livanatalya
30.10.2022 16:48
Сколько времени (в минутах) затратит школьник на дорогу из школы, если известна длина расстояния (s км) и средняя скорость движения школьника (v км/ч)? (паскаль, линейные...
gelyusya
25.05.2023 06:12
Дан одномерный вещественный массив из n чисел. написать программу нахождения суммы элементов массива стоящих на нечетных позициях (индекс). блок схема не нужна только программа...
dan4ik105217
25.05.2023 06:12
Какое из имён, удовлетворяет логическому условию: первая буква согласная & четвёртая буква гласная в слове четыре буквы. 1)сергей 2)вадим 3)антон 4)илья...
leraaleksan
03.03.2022 15:25
Задача 6.5 Напишите процедуры рисования букв «К», «О», «Т» В том виде, как они показаны на рисунке. Назовите этипроцедуры буква К, буква 0, буква т.Задача 6.6 Составьте программу,...
kuansh4
08.11.2022 17:11
Надёжность паролей. Урок 2 Определи надёжные пароли.Верных ответов: 2Urt_89_ee#$$Qqwerty1!1234567890Iker!_89### ...
Violetta711
12.01.2023 00:16
Является ли - 2.5 решение неравенства. 5(х+2)-4(1+3х) 20...
serofimtimoxa
12.06.2022 15:30
Как располагаются все части цветка относительно друг к другу...
zFast88
12.06.2022 15:30
Назовите три числа которые делятся на два, делятся на пять, делятся на два и пять, не делятся ни на два и ни на пять...
DizlPlayS
12.06.2022 15:30
Записать все трех значные числав которых число сотен в 2 раза больше числа десятков а чесло едениц на 2 меньше числа едениц...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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.