komogortseva0101
26.12.2021 08:02

Написать в паскале. Узнать у пользователя отдельно день, месяц и год рождения и сообщить, сколько дней и месяцев осталось до дня рождения в этом году. Если в этом году день рождения уже сообщить об этом, также в обоих случаях вывести количество лет.​

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
ludarudenko98
25.08.2021 12:18

1 набор текста;

2 вырезание кусков текста, запоминание их в течении текущего сеанса работы, а также в виде отдельных файлов;

3 вставка кусков в нужное место текста;

4 замена слов одно на другое частично или полностью по всему тексту;

5 нахождение в тексте нужных слов или предложений;

6 форматирование текста, т.е. придание ему определенного вида по следующим параметрам: ширина текстовой колонки, абзац, поля с обеих сторон, верхнее и нижнее поле, расстояние между строками, выравнивание края строк;

7 автоматическая разбивка текста на страницы с заданным числом строк;

8 автоматическая нумерация страниц;

9 автоматический ввод подзаголовков в нижней или верхней части страницы;

10 выделение части текста жирным, наклонным или подчеркнутым шрифтом;

11 переключение программы для работы с другим алфавитом;

12 табуляция строк, т.е. создание постоянных интервалов для представления текста в виде колонок;

13 при вводе текста вы упираетесь в конец строки, Word автоматически делает переход на следующую строку;

14 если при вводе текста делается опечатка, функция автокоррекции автоматически ее исправляет. А функция автоматической проверки орфографии подчеркивает неправильно написанные слова красной волнистой линией, чтобы их было легче увидеть и исправить;

15 если пользоваться дефисами для выделения пунктов списка, употреблять дроби, знак торговой марки или другие специальные символы, функция автоформатирования будет сама их корректировать;

16 возможность вставки в текст формул, таблиц, рисунков;

17 возможность создания нескольких текстовых колонок на одной страницы;

18 выбор готовых стилей и шаблонов;

19 для представления текста в виде таблицы можно, конечно, пользоваться и табулятором, однако Microsoft Word предлагает гораздо более эффективные средства. А если таблица содержит цифровые данные, то их легко превратить в диаграмму;

20 режим предварительного просмотра позволяет увидеть документ в том виде, в каком он выйдет из печати. Кроме того, он дает возможность отобразить сразу все страницы, что удобно для внесения изменений перед распечаткой.

0,0(0 оценок)
Ответ:
Fura44
20.02.2022 00:02
// PascalABC.NET 3.4.2, сборка 1797 от 22.09.2018// Внимание! Если программа не работает, обновите версию!

function CycleFraction(a, b: integer): string;

begin

 Result := (a div b).ToString;

 a := a mod b;

 if a = 0 then exit;

 Result += ','; // разделитель

 var k := Result.Length + 1;

 var ost := new SortedList<integer, integer>;

 ost.Add(a, k);

 while True do

 begin

   a *= 10;

   Result += (a div b).ToString;

   a := a mod b;

   if ost.ContainsKey(a) then

   begin

     var p := ost.Get(a);

     Result := Result?[:p] + (a <> 0 ? '(' + Result?[p:] + ')' : ''.ToString);

     exit

   end

   else

   begin

     k += 1;

     ost.Add(a, k);

   end

 end

end;


begin

 var (a, b) := ReadInteger2('Введите числитель и знаменатель:');

 CycleFraction(a, b).Println;

end.


Впаскале даны два натуральных числа a и b. вывести a/b в виде периодической дроби. например: 1/3=0,(
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота