1. Информатика
  2. Как написать в паскале ,чтобы

Как написать в паскале ,чтобы писать любой год и выдавалось кто ты по китайскому гороскопу

alinkamomot2004 alinkamomot2004    1   28.06.2019 19:40    0

Ответы
Rika2468 Rika2468  22.07.2020 21:49
Надо задать,каким был,например 1900 год.Или какой-то иной меньше которого не зададут.Этот год условно считать нулеввым.Вводим любой год,находим разность между ним и 1900г(или тем,который выбран) и находится остаток от деления на 12.Например,вводим1990,тогда1990-1900=90.90mod 12=6 .И по этому значению берём 6-ой по кольцу год от того,которым был 1990.Через оператор выбора из многих (case)
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
банан0008 банан0008  13.10.2020 19:43
Запиши символы в двоичном коде: N, Q, S, T, L....
America555 America555  13.10.2020 19:43
Сколько времени потребуется для передачи файла объемом 2070 Кбайта, если скорость передачи 6 Мбит/с? ​...
дана34657 дана34657  13.10.2020 18:21
На домашнем компьютере измерили скорость интернета с сайта данные приведены на Рис. 1. Результат интернетометра Рис. 1.Определите: Сколько секунд займет отправка письма,...
fgtfbn1347837 fgtfbn1347837  26.12.2019 11:20
Назовем натуральное шестизначное число n(1 =n =) счастливым если сумма двух его крайних цифр не больше чем сумма остальных четырех цифр. найдите кольчество таких чисел....
Liz0997 Liz0997  26.12.2019 11:16
Подсчитайте количество целых чисел в диапазоне от 15(16) до 30(16)​...
bogdan2041 bogdan2041  26.12.2019 11:07
Водной из кодировок unicode каждый символ кодируется 16 битами.определите информационный объём следующего предложения : с книгой поведёшься-ума наберёшься...
alina1885 alina1885  26.12.2019 11:02
Блок-схема вычисления y равно скобка 1 / x если x меньше 0 1 / x квадрате если x больше y если x равно нулю​...
bogdansudak2006 bogdansudak2006  26.12.2019 11:01
почему здесь (201)-100? const n=10; var a: array[1..n] of integer; c,d,i: integer; begin randomize; for i: =1 to n do a[i]: =random(201)-100; writeln( заданные числа,...
ValeriaChernysheva ValeriaChernysheva  26.12.2019 11:00
На числовой прямой даны два отрезка: p = [2,42] и q = [22,62] выберите такой отрезок a , что формула (x ∉ a) — ( ( x ∈ p) — ( x ∉ q) ) тождественно истинна , то есть...
Fantom511 Fantom511  26.12.2019 10:59
Укажите невозможное имя файла: 1. text. 3.exe2. : documentac.txt3. creml.bmp4. dokum4что из предложенного может быть полным именем файла: 1. a: \kniga/txt2. f\kniga3....

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