Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Ivan190901
18.04.2023 14:54 •
Информатика
Дано 2 числа, вывести на экран целую часть их полусуммы
Ответ:
Yarik346
06.10.2020 16:36
Var
a,b:longint;
c:real;
begin
read(a,b);
c:=(a/2)+(b/2);
Trunc(c);
write(c);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Marat445372
11.05.2023 11:32
1) Рассмотрим задачу Заполнить массив квадратами чисел от 1 до 10 и вывести на печать решив это умножьте каждый елемент массива на 2. 2)Найдите произведение элементов массива...
RCloke
08.03.2023 08:51
Доповнити лічилочку. я знаю такі повідомлення за подання: графічні-...
oDESo
08.03.2023 08:51
Вкодировке utf-8 каждый символ алфавита кодируется шестнадцатью битами. определите количество символов в сообщении ,если информационный объём сообщения в этой кодировке равен...
рано12
08.03.2023 08:51
Примеры чисел с фиксированной запятой...
Skotonyaka
25.03.2020 08:14
Перевести число 703048 из десятичной системы в двуичную, в восьмиричную, и шеснадцетиричную; число 2l перевести из шестиричной системы в восьмиричную, и в десятиричную. !...
Danilenok
13.11.2020 13:03
Постройте граф, отражающий отношения между следующими понятиями: информационные процессы, сбор информации, обработка информации, хранение информации, передача информации, получение...
Елена5763
19.07.2022 19:06
Запишите два условия, ложные при a=0, b=-5, c=5....
оооо140
12.11.2022 11:03
Y=(〖(x+1)〗^2+2(x+1))/4 решить на языке програмирования паскаль...
annatarasova1991
12.11.2022 11:03
Правила безопасности работы за компьютером...
mkmoonlightovwm0o
27.09.2021 19:55
Подсчитайте количество страниц в учебнике(их143) и вычесли его объём!...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
a,b:longint;
c:real;
begin
read(a,b);
c:=(a/2)+(b/2);
Trunc(c);
write(c);
end.