1. Информатика
  2. Программа в pascal abc с клавиатуры

Программа в pascal abc с клавиатуры вводится вещественное число, если оно из интервала {3,10} то на экран вывести его целую часть иначе десятичную

ibatulina03 ibatulina03    2   02.08.2019 16:50    0

Ответы
kabilet777 kabilet777  30.09.2020 02:34
Var r: real;
begin
 read(r);
 if (r > 3) and (r < 10) then
  write(trunc(r))
 else
  write(r - trunc(r))
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
anastasiasestak anastasiasestak  25.09.2019 03:50
1)сколько мбайт информации содержат сообщения следующего объёма: 216 байтов 1/8 кбайт (дробь) 2)сколько информации содержат сообщения следующего объёма: 216 бит...
zakriev767 zakriev767  25.09.2019 03:50
Сколько уровней громкости можно закодировать если использовать для это го последовательность из 5 бит...
galina510 galina510  25.09.2019 03:50
Как ты определяешь, писать ь на концеглагола или нет?...
baha50 baha50  15.09.2020 12:04
С. Абак 2. В древнем мире при счетебольшого количества предметовдля обозначения определенного ихколичества применяли зарубку напалочке. Определите первоевычислительное...
богдана135 богдана135  15.09.2020 05:28
Бинарные строки ограничение по времени на тест: 3 секунды ограничение по панти на тест: 256 мегабайт оро стандартный ввод вывод стандартный вывод Строка называется...
maschkincolyaoyf9ei maschkincolyaoyf9ei  21.04.2020 10:25
Определите длину кратчайшего пути между пунктами A и B (при условии, что передвигаться можно только по построенным дорогам)....
snezhana0709 snezhana0709  30.11.2020 12:05
зделать конспект инфарматика 6 класс 6 параграф...
Stepan0305 Stepan0305  30.11.2020 12:05
1. Как можно создавать модели в программе SketchUp? 2. Каковы функции инструментов управления пространством в про- грaммe SketchUp? 3. Для выполнения каких действий...
95123451 95123451  30.11.2020 12:04
В какой системе счисления справедливо равенство: 2 • 4=11...
Natalii2017 Natalii2017  30.11.2020 12:04
Заполните схему 1) программное обеспечение 2) системные программы 3) прикладные программы 4) операционная система 5) драйверы 6) системы программирования 7) текстовый...

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