Составить программу, которая по порядковому номеру дня недели выводит соответствующую фразу - "Суббота", "Воскресенье" или "Рабочий день"

+3
Ответы (1)
  1. 30 июня, 18:31
    0
    program zz1;

    var a:integer; / / заводим переменную

    begin

    write ('введите номер дня недели '); / / вводим с клавиатуры номера дня недели

    read (a);

    case a of / / в зависимости от введенного номера дня недели выбираем выводимый ответ

    7:writeln (' Воскресенье ');

    6:writeln (' Суббота ')

    else

    writeln (' Рабочий день ');

    end;

    end.
Знаешь ответ на этот вопрос?
Новые вопросы по информатике
что такое графическая модель
Ответы (1)
Сколько всего было иероглифов в египетском письме?
Ответы (1)
Файл размером 6 Кбайт передается через некоторое соединнение 600 сек. Сколько секунд будет передаваться файл размером 6 Гбайт?
Ответы (1)
Напистаь программу удаления из строки чётных или нечётных чисел
Ответы (1)
Орган человека, воспринимающий вкусовую информацию 4 буквы
Ответы (1)
а) Выбери название действия, которое былс совершено при форматировании текста 1. ТЕКСТ 1 Декодирование - это восстановление информации по её кодированной форме ТЕКСТ 2 Декодирование - это восстановление информации по её кодированной форме ТЕКСТ 3
Ответы (1)
Скорость передачи данных через ADSL-соединение 128000 бит/с. Сколько времени займет передача файла объёмом 5 Мбайт по этому каналу? а) 328 б) 41 в) 5,5 г) 40
Ответы (1)
Если при наборе текста все буквы отображаются прописными то это означает что нажатие клавиша 1. Num Lock 2. Caps Lock 3. F1
Ответы (1)
как открыть командную строку
Ответы (1)
Сканируется цветное изображение размером 25X25 см. Разрешающая способность сканера 300X300 dpi, глубина цвета-3 байта. Какой информационный объём будет иметь полученный графический файл.
Ответы (1)