Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
синегривка2
14.10.2021 07:28 •
Информатика
Перевод неправильной дроби в правильную несократимую код на pascalabc.net
Показать ответ
Ответ:
КликКлак11
27.09.2020 21:11
Var
a,b,am,nod,bb:integer;
begin
readln(a);
writeln('');
readln(b);
am:=a mod b;
bb:=b;
while am*b<>0 do
if am>b then am:=am mod b else b:=b mod am;
nod:=am+b;
writeln(a div bb,' ',a mod bb div nod,'/',bb div nod);
end.
Ввод:
14
3
Вывод:
4 2/3
0,0
(0 оценок)
Популярные вопросы: Информатика
Бодя7789
18.05.2022 02:31
Як использовать компютерную графику ето очень важно!...
leralerochka202
06.02.2023 07:15
Максат создал на компьютере видео космонавтах которая захотела отправить своим друзьям он стал он стал отправлять письмо с прикрепленным видео на электронную почту...
covo1
04.09.2020 13:22
1. Дайте определение этапам решения задач на компьютере. 2. Для значений A = истина, B = ложь, C = истина вычислите значение логического выражения (B = C ∨⏋A) ∨⏋(A...
Ivan2367
01.05.2022 02:29
В каких документих встречается гиперссылка? Привели кривиера. 2. Как влияет исполлона и гиперссылок на работу с документомв текстовом редакторе?3. Какова значимость...
Lena2345671
10.06.2022 03:18
Напишите код Задание 1Cоздайте новый проект в Tinkercad Circuits. Добавьте пла-ту Arduino Uno и подключите 5 или больше светодиодов,кнопку и LCD-дисплей. Запрограммируйте...
Ксюша0071111
11.07.2021 22:13
Изучите предложенный фрагмент документа и определи обьект,поонумерованные римикскими и арабскими цифрами...
almira666ozs336
28.04.2021 22:24
Створити цикл, який друкує на екрані парні числа, доки не дійде до твого віку....
malika0408
15.03.2022 08:08
2. Возвращаясь со школы, Арман подошел к перекрестку, регу- лируемому светофором. В уме он быстро составил алгоритмперехода улицы:Остановиться;Посмотреть на сигнал...
bulatdikhin
18.04.2022 07:10
Записати результат виконання алгоритму n:=0; for i:=1 to 2 do n:=n+i*i; *...
Dive1
18.08.2021 00:11
Задание на фотографии....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a,b,am,nod,bb:integer;
begin
readln(a);
writeln('');
readln(b);
am:=a mod b;
bb:=b;
while am*b<>0 do
if am>b then am:=am mod b else b:=b mod am;
nod:=am+b;
writeln(a div bb,' ',a mod bb div nod,'/',bb div nod);
end.
Ввод:
14
3
Вывод:
4 2/3