1. Информатика
  2. Составить программу ,

Составить программу , которая определяет , являются ли два числа взаимно простыми , и выводит на экран сообщение 'да' или 'нет' и используя с цикл параметром (взаимно простые числа - это числа , которые не имеют общих делителей кроме 1 , на пример : 3 и 5)

DIMITMARASIT DIMITMARASIT    2   28.09.2019 08:20    1

Ответы
saya8282 saya8282  10.09.2020 19:18

begin

 var a := ReadInteger('a =');

 var b := ReadInteger('b =');

 

 while b <> 0 do

 begin

   a := a mod b;

   Swap(a, b)

 end;

 

 Print(A = 1 ? 'Да' : 'Нет')

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
ЗАЙКА200515 ЗАЙКА200515  04.05.2022 00:37
Дано два цілих числа N та М. Якщо число N не є дiльником числа M, то надрукувати „Так , у протилежному випадку надрукувати „Hi ....
andrewlitvinov4 andrewlitvinov4  04.05.2022 00:37
1. Используя данные таблицы БлюдоБорщКотлетаКашаЧай3540203Ценаотсортировать блюда по возрастанию цены. Вывести отсортированный вариант списка блюд. 2. Имеется список учеников...
rogaoksi rogaoksi  04.05.2022 00:48
Вкладник поклав у банк на депозит х грн на k років під 15%річних.Банк щорічно додає прибуток до суми вкладу.Складіть математичну модель і фрагмент проекту для визначення...
diankapazyukа diankapazyukа  28.11.2021 12:52
Задание 3 ( ). Дана таблица. В таблице показана стоимость проезда между населёнными пунктами. Представьте информацию из таблицы в виде схемы. inform-8-111.png...
umrina985 umrina985  28.11.2021 12:54
Нужно создать html-документ. Основы веб-конструирования. Информатика 11 класс. Вот задание. Нужно записать все, как в блокноте....
nastya02022 nastya02022  28.11.2021 12:54
выписать наборы входных переменных с учётом того что они представляют собой ряд целых n разрядных двоичных чисел от 0 до 2n - 1...
juwal juwal  15.06.2019 02:00
Производится звукозапись в режиме стерео с частотой дискретизации 48кгц и 16-битной глубиной кодирования. запись длится 2 минуты. ее результаты записываются в файл, сжатие...
kamilya14957 kamilya14957  14.04.2020 13:01
Напишите программу которая считает сумму квадратов чисел от 1 до 7...
IrinaArinaRina IrinaArinaRina  14.04.2020 13:00
Что такое центр обработки данных и Зачем он нужен​...
artur19912000 artur19912000  11.05.2020 12:23
2. Задание на сопоставление. Выберите и напишите правильный вариант (формат оформления 1-А, 2-В). (46) yaser meyat Акин Гребра і построеносій r ase Поворачивает обьект в...

Популярные вопросы