Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
danilp18
15.02.2021 05:35 •
Информатика
Паскаль дано целое четырехзначное число. найти модуль разности числа, образованного первыми двумя цифрами и числа, образованного последними цифрами . (для числам 3245 рассматриваются 32 и 45) паскаль
Показать ответ
Ответ:
CrySony1
05.10.2020 22:00
Var n: integer;
begin
write('N = '); readln(n);
n:=n div 100 - n mod 100;
if n<0 then n:= -n;
writeln(n);
end.
N = 4235
7
0,0
(0 оценок)
Популярные вопросы: Информатика
monkey06
24.01.2023 04:51
Состваить программу вычисления площади конуса.в паскаль. s=(1/3)п*r^2*h...
KoRmlx
24.01.2023 04:51
Вкниге 20 страниц, на каждой странице 50 строк, в строке 60 символов. для кодирования одного символа используется 16 бит. сколько таких целых книг поместится на флэшку...
Винокуров1998
16.09.2020 10:04
Из скольки частей состоит имя файла foto.jpg а)1 части-наименование файла б)2 части-наименование файла и расширение файла в)3 части-наименование файла расширение файла...
LIZETTA111
16.09.2020 10:04
С++ напишите эффективную программ, которая по двум данным натуральным числам х и у, не превосходящим 10000, выводит на экран и подсчитывает количество натуральных чисел,...
Klamie
16.09.2020 10:04
Крестьянин с двумя волками,собакой,козой и мешком капусты подошел к реке. ему надо переправиться на другой берег, однако лодка трехместная, каждое место занимает человек,...
Атэва
23.03.2021 21:36
Визначте вартість шпалер для кабінету інформатики...
мяустик
23.03.2021 21:36
Язык программирования. 5 букв. первые 3: к о б...
fiskevich2
07.07.2020 07:04
решить! Всі вхідні змінні передати як параметри функції (аргументи). Функція повертає результат обчислення. При необхідності (така необхідність є в кожному варіанті завдання...
Lane9ig
30.03.2022 04:41
Вкажи на умову в базовій структурі розгалуження повної форми в середовищі Скретч...
KatyaCat69
23.04.2021 11:12
Какое слово разделено для переноса неправильно? за-мёрз-ша-я, ут-рен-ний, оби-жен-ная?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
write('N = '); readln(n);
n:=n div 100 - n mod 100;
if n<0 then n:= -n;
writeln(n);
end.
N = 4235
7