Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
sofya206
29.07.2021 10:23 •
Информатика
Используя функцию round, int ,frac, применив их к некоторому вещественному х, округли число до ближайшего целого числа (составить программу в паскаль)
Ответ:
АндрейЯсийчук
22.09.2020 23:00
Если до ближайшего целого, то можно так:
var
a: real;
begin
write('Введите вещественное число A: ');
readln(a);
writeln(round(a));
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
KarinaFelton
11.03.2022 07:15
Написать в паскале: for s=1+1/2+1/3+1/4+1/5...
alino4ka2012
28.11.2022 03:20
Какое значение получит переменная y после выполнения алгоритма?x:=3y:=2∗xy:=y+6y:=y∗xy:=y+7y:=y∗xy:=y+8...
MikiMio
21.08.2021 09:29
2. Какой из выводов является правильным при исполнении скрипта в программе Scratch, по-казанного на рисунке 141?...
alex3942
03.08.2022 07:51
Дан алгоритм для Робота: алг нач нц 25 раз вправо; закрасить кц кон 1. Если левее Робота не встретится препятствий, то, выполнив приведённый выше алгоритм, он переместится на 25...
Nastyacat200809
07.01.2022 07:49
Определи значение переменной a после выполнения фрагмента алгоритма при a=0 и a=13.Ввод аесли a 5 то a:=a+20 иначе a:=a*10всёответ: при a=0 значение переменной a равно= , при a=13...
losangelina23
10.11.2022 08:56
решить задачи по информатике...
софилка
14.04.2023 19:05
Почему логает компьютер? ...
SamDem
19.10.2021 17:34
Укажите иллюстрацию, в которой ход лучей рисуется правильно....
pvpgame2345
10.12.2020 06:20
Вставьте пропущенные слова: Внутри жидкости существует……………. и на одном и том же уровне оно………………. по всем направлениям. С глубиной …………………. увеличивается....
alanasia2004
06.03.2023 11:33
Чтоб несёт ген ? Нуклеиновая кислота или белки ?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var
a: real;
begin
write('Введите вещественное число A: ');
readln(a);
writeln(round(a));
end.