Войти
Регистрация
Спроси ai-bota
akmal8606
11.04.2020 01:02
Паскаль составьте программу определяющую разность цифр данного двузначного числа n
Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
MisteryHack0
12.05.2021 23:08
Жаратылыстану пəнінің мұғалімі Диасқа Қазақстандағы табиғат құбылыстары тақырыбында видеожазба жасауға тапсырма берді.Диасқа қандай кенес берер едің?...
marta62
25.02.2020 06:17
пределите значение переменных х и у после выполнения фрагмента алгоритма (решение в виде таблицы для значений указанных ниже в таблице)X=20,Y=5 с табличкой!!...
svistmi20061
28.02.2023 17:19
РЕБЯТА Друзья Валера, Никита и Паша участвовали в спортивном турнире. На них были спортивные костюмы красного, синего и зеленого цветов. Известно, что у Валеры никогда не...
tema152331
28.03.2021 15:26
Даны три массива действительных чисел {x} (i=1,2,...,n), {y} (j=1,2,...,m), {z} (k=1,2,...,10). . Напечатать массив с а) наибольшей суммой положительных элементов; б) наименьшей...
turdalievab
23.06.2021 18:21
Найти максимум и минимум трех чисел a, b, c...
OGordienko1
20.03.2022 21:11
Копіюючи вміст клітинок за до буфера обміну, можна в контекстному меню використовувати додаткові параметривставлення Дослідіть, як змінюються дані при вико-ристанні різних...
belevich031197
30.12.2020 03:32
Братьяя ! За спам забаню немедленно Поміркуй та запиши свою думку, чому саме Бейсік та Паскаль використовували у 1970-х роках для навчальних цілей. Напиши повідомлення обсягом...
noname0002
26.05.2023 01:33
Кто сделает и сфотает поставлю как лучший ответ...
sanya48481
08.05.2023 12:13
решить на пайтон задачу 1 Напишите программу, которая по данному числу n от 1 до 9 выводит на экран n зверьков. Между двумя соседними зверьками также имеется пустой (из пробелов)...
grskdarina
16.11.2020 07:03
с задачей двухразрядные последовательные двоичные числа...
Ответ:
14света14
08.10.2020 05:55
//PascalABC.NET
//Версия 3.3, сборка 1634
begin
var n:=abs(ReadInteger);
write(n mod 10-n div 10);
end.
0,0
(0 оценок)
Ответ:
apolo230kmn
08.10.2020 05:55
Var n,a,b:Integer;
begin
Read(n);
a:= n div 10;
b:= n mod 10;
WriteLn(a-b);
end.
0,0
(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота