М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Tractorust
Tractorust
05.04.2023 08:05 •  Информатика

1.Пользователь вводит номер дня недели, вывести на экран название дня. Написать задачу с оператора условия if и оператора выбора Case. 2.Пользователь вводит количеств сантиметров. Далее вводит 1, если он хочет перевести его в мм, 2 в км и 3 дециметры. Вывести на экран результат перевода из см в выбранные единицы.
нужно написать программу в паскале
И еще я не знаю много или мало за решение этих двух задач, но буду очень благодарен за

👇
Открыть все ответы
Ответ:
bubisolha1
bubisolha1
05.04.2023
В древнем Египте использовалась нумерация, основанная на десятичной системе счисления:
- для единиц использовались палочки
- для десятков - пятки
- для сотен - мерные верёвки
- для тысяч - цветущий лотос
- десятки тысяч - пальцы
- сотни тысяч - головастики или жабы
- миллионы - человек
Также иногда утверждается, что десятки миллионов изображались иероглифом восходящего солнца в честь бога Амона Ра.

Для записи чисел иероглифы повторялись до девяти раз и записывались вместе.

Несколько позже (не позже 1740 г. д.н.э.) у египтян появился символ, обозначающий число ноль. Он изображался в виде сердца с крестом.
Вдревнеегипетской нумерации для записи целых чисел какие использовались иероглифы
Вдревнеегипетской нумерации для записи целых чисел какие использовались иероглифы
4,4(61 оценок)
Ответ:
МастерХ
МастерХ
05.04.2023

Как организовать ожидание в программе до нажатия какой-либо клавиши? В QBasic для этой цели подойдет системная переменная INKEY$. Достаточно присвоить ее значение какой-либо символьной переменной, например А$, и организовать бесконечный цикл до тех пор пока длина значения А$ перестанет отличаться от нуля:

А$=""

М10 : A$=INKEY$ ; IF А$="" THEN GOTO M10

Можно воспользоваться и другим приемом — включить в программу оператор ввода в какую-либо переменную символьного типа. Такая переменная предпочтительнее числовой, т. к. в нее можно ввести пустое значение, нажав только клавишу <Enter>. Кроме того, набор любого отображаемого символа не приведет к ошибке.

В Си временный приостанов до нажатия какой-либо клавиши организуют с функции getch.

В Паскале можно организовать бесконечный цикл, аналогичный приведенному выше варианту для QBasic, с логической функции KeyPressed:

while not KeyPressed;

var

 N: integer;

begin

 write('N = ');

 readln(N);

 writeln;

 writeln('Цифры числа (справа налево):');

 while N > 0 do { <-- Выполняем цикл, пока число больше 0 }

 begin

   write(' ', N mod 10); { <-- выводим остаток деления на 10 }

   N := N div 10 { <== находим целую часть от деления на 10 }

 end;

 readln

end.

Примеры

Входные данные

3

v 3

l 1

u 2

luvu

3

luv

vul

uuu

Выходные данные

6

11 задание не знаю сорри бро дай корону

4,8(71 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ