tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Программа евклида в паскаль
Программа евклида в паскаль где нод 40 и 64
synnjhcx
3 23.07.2019 17:03
1
Ответы
рксский
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
асат7
06.04.2021 17:35
сделайте эти 2 задачи как в пайтоне....
27081984e
06.04.2021 17:32
Якими командами можна поставити у відповідність числам з табличної величини фігури з відповідними кольорами? •••Какими командами можно поставить в соответствие числам...
aodushkina824oya9o5
27.07.2019 11:40
Вясельной группе 11 деток любят манную кашу, 13 – гречневую и 7 малышей – перловую. четверо любят и манную, и гречневую, 3 – манную и перловую, 6- гречневую и перловую,...
kirra00787p07znc
27.07.2019 11:30
На двумерный массив в pascal! в группе учится n студентов, студенты получили по четыре отметки за экзамен. определить количество неуспевающих студентов и средний группы....
klepekhin
22.06.2020 10:43
Составить алгоритм и написать текст программы для поиска максимального значения из 10 чисел, введенных с клавиатуры НА ПАСКАЛЕ!...
2547456
12.06.2019 06:30
Валфавите .. символов , текст состоит из .. символов . сколько байтов в тексте ? ответ: 32. решить обратную (заполнить пробелы)...
StasKras01
12.06.2019 06:30
Как настроить клавиатуру, чтоб она сама продолжала слова после ввода двух на...
evgen22regiooon
12.06.2019 06:20
∞)последовательность команд, которые нужно выполнить чтобы получить требуемый результат ? 2)значок, который отображает ссылку на объект.3) всемирная компьютерная сеть4)...
zopanegra
12.06.2019 06:20
Устройства,позволяющие получать видеоизображение и фотоснимки непосредственно в цифровом(компьютерном) формате,-это: а)монитор,б)принтер,в)мышь,г)цифровые...
ksyusham041
12.06.2019 06:20
Алфавит некоторого языка состоит из 5 букв. сколько различных четырехбуквенных слов можно составить в этом языке?...
Популярные вопросы
Решите уравнение : а)-27x+220=-5x б)7a=310+3a...
3
Втреугольнике abc угол c равен 90º, а угол a 30º, ab=40. найдете...
2
Прочитай текст и выполни . фомка и барин. 1) в сумерках возвращался...
3
Составьте пословицу из слов гулять,дежурный,рыбка , слово...
2
Из стихотворении бианки надо нарисовать животного какого нибудь...
1
Высота правильной четырехугольной усеченной пирамиды равна 7 см...
1
Площадь африки 29 200 000 км 2 а вместне с островами на 1 100 00...
2
Составь пословицы: дружба,шило,смелый,свет,дрова,безделье,собака,дело,коса,потеха,ученье,лес,час,трусливый,время,служба,большой,маленький,мешок,лаять,утаишь,камень,тьма,больше,неученье...
1
Омывающие моря и океаны северной америки с севера,юга,востока,запада...
2
6,09-1,5х=1,2 решить, должно быть 5...
2
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.