Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
лера21091
21.03.2020 04:38 •
Информатика
На языке pascal: дано число - 2852 вытащить из середины число 85 и 58 число 2852 дано целиком то есть, const a = 2852;
Ответ:
Aleksa413
05.10.2020 07:57
A1:=a div 100
a2:=a div 10
writeln('85: 'a1,a2,' 58: 'a2,a1)
0,0
(0 оценок)
Популярные вопросы: Информатика
sofya0skoblova
24.12.2020 18:33
Дан целочисленный массив из 12 элементов случайных целых чисел ,принадлежащих интервалу [10; 45[.необходимо найти произведение элементов массива ,кратных 5.можно, , с подробным объяснением,...
cherru1
24.10.2020 14:58
Какое из имен удовлетворяет логическому условию: первая бкву согласная- первая бква гласная ^последняя буква согласная -последняя буква гласная 1.ирина 2.максим 3.артем 4.мария напишите...
стеффа11
28.03.2023 02:08
В9 строчке выдаёт ошибку комп пишет «функция random с параметрами указанных типов не найдена» ! 1. program chislo; 2. var n, k, i, raz: integer; 3. begin 4. write (сколько чисел нужно...
Про100карина666
04.12.2020 09:59
Каким будет результат вычислений в ячейке с3 после копирования в ячейку d3 формулы из ячейки с1 ?...
345153
29.01.2023 14:24
Даны 2 числа. если они оба отрицательные, то вывести их модуль, если они оба положительные, то возвести их в квадрат....
Lalker1337
23.03.2021 23:46
Сколько дисков dvd потребуется для записи архива объёмом 700гбайт? ёмкость одного диска 4,5 гб...
bbayy
04.07.2022 05:51
Определите высоту столба нефти, создающего такое же давление, как и столб воды высотой 40 см....
ПолинаКим13
27.04.2023 12:15
Задание выберите фильм ниже что бы написать о нем отзыв . 7класс тжб....
amdv
23.01.2022 19:27
X⁴ - 4x³ - 7x² + 34x - 24 = 0Найдите сумму корней уравнения(желательно подробное решение) ...
elizaveta871
23.01.2022 19:27
(295-х):70=4 розвязати рівняння...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
a2:=a div 10
writeln('85: 'a1,a2,' 58: 'a2,a1)