logo
Войти Регистрация Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Алина113111
Алина113111
08.08.2021 01:31 •  Информатика

Зададено двузначное число. найдите разность между количеством десятков и одинок. нужно составить программу в pascalabc.

Показать ответ
Ответ:
adamadam
adamadam
07.10.2020 22:57
Var
n:integer;
begin
Read(n);
Writeln(n div 10 - n mod 10)
end.
0,0(0 оценок)
Популярные вопросы: Информатика
данил1956
данил1956
29.03.2022 09:06
с информатикой Смотри фот вверху Ал­го­ритм вы­чис­ле­ния зна­че­ния фу >...
darunaivastcyk123
darunaivastcyk123
02.10.2020 22:21
Даны натуральные числа a, n. Найти a в степени n. Составить блок-схему и программу....
CatyX8
CatyX8
08.02.2020 08:48
Дано натуральное число n . Требуется подсчитать количество цифр данного числа....
kolesnikov20021
kolesnikov20021
30.04.2023 18:05
Напишите программу,которая в последовательности натуральных чисел определяет количество трехзначных чисел кратных 4.программа получает на вход натуральные числа,количество введённых...
Leylanagieva
Leylanagieva
08.08.2020 08:41
Дан фрагмент программы, чему будет равна переменная s? паскаль: begin i: =4; s: =1; while i =9 do begin s: =s+i; i: =i+2; end; writeln ( s= ,s); end....
aisultankubashev
aisultankubashev
08.08.2020 08:41
Какое число будет напечатано на экране компьютера в результате выполнения фрагмента программы? паскаль y: =0; for k: =1 to 15 do begin if k mod 5 = 0 then y=y+1; end; write(y);...
1kukukukuku
1kukukukuku
11.09.2021 10:26
Написать программу выводо на экран элементов кратных числу 3 pascal...
sudak7
sudak7
22.03.2020 10:01
Написать программу вычисления произведения n вводимых с клавиатуры чисел...
228ie228
228ie228
22.03.2020 10:01
Одна программа, работающая с форматом tiff, не смогла прочитать файл этого же формата, созданный другой программой. в чём причина?...
Рафаэлла2004
Рафаэлла2004
15.05.2021 05:19
2.1 d) К каждому существительному подберите определенный артикль. Sport (m) – Théâtre (m) – Nature (f) – Français (m) – Cinéma (m) – Langue étrangère (f) – Sorties (p) – Anglais (m)...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота