Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.63/8: Рейтинг темы: голосов - 8, средняя оценка - 4.63
0 / 1 / 0
Регистрация: 14.05.2010
Сообщений: 43

Определить, равна ли сумма или разность каких-либо двух цифр третьей цифре числа

30.05.2010, 21:40. Показов 1727. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Составить программу, которая на ввод натурального трехзначного числа проверяет, не равна ли сумма или разность каких-либо его двух цифр третьей цифре числа.
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
30.05.2010, 21:40
Ответы с готовыми решениями:

Равна ли сумма каких-либо двух цифр заданного трехзначного натурального числа, третьей цифре.
Сумма каких-либо двух цифр заданного трехзначного натурального числа N равна третьей цифре.

Сумма каких либо двух цифр заданного трехзначного натурального числа n равна третьей цифре
сумма каких либо двух цифр заданного трехзначного натурального числа n равна третьей цифре

Сумма каких-либо двух цифр заданного трехзначного натурального числа N равна третьей цифре.
Помогите решить задачу. Сумма каких-либо двух цифр заданного трехзначного натурального числа N равна третьей цифре. Заранее спасибо.

1
162 / 162 / 42
Регистрация: 29.05.2010
Сообщений: 435
30.05.2010, 22:48
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Вот я не понимаю, что, лень самому написать?Написал минут за 5
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
uses crt;
var
 a:integer;
 c1,c2,c3:byte;
begin
 writeln('BBeDuTe TPex3Ha4Hoe 4ucJIO');
 readln(a);
 c1:=a div 100;
 c2:=(a-c1*100) div 10;
 c3:=a-c1*100-c2*10;
 if c1+c2=c3 then writeln(c1,'+',c2,'=',c3);
 if c2+c3=c1 then writeln(c2,'+',c3,'=',c1);
 if c3+c1=c2 then writeln(c3,'+',c1,'=',c2);
 if c1-c2=c3 then writeln(c1,'-',c2,'=',c3);
 if c2-c1=c3 then writeln(c2,'-',c1,'=',c3);
 if c1-c3=c2 then writeln(c1,'-',c3,'=',c2);
 if c3-c1=c2 then writeln(c3,'-',c1,'=',c2);
 if c2-c3=c1 then writeln(c2,'-',c3,'=',c1);
 if c3-c2=c1 then writeln(c3,'-',c2,'=',c1);
 readln;
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
30.05.2010, 22:48
Помогаю со студенческими работами здесь

Определить равна ли сумма первых двух цифр числа третьей его цифре
bool ifaplusbC(int x) { int a,b,c; a=x/100; b=x%100; b=x/10; c=x%10; if(c==a+b) return true; else

Определить, сумма каких цифр в третьей степени равна квадрату числа
Помогите, плиз, решить задачу: Пользователь вводит число А. Необходимо определить, сумма от каких цифр в третьей степени равно А*А. ...

Равна ли сумма двух первых цифр заданного четырехзначного числа его последней цифре?
Написать программу, которая печатает значение логического выражения TRUE или FALSE, в зависимости от ложности или истинности следующего...

Определить, равна ли сумма двух первых цифр заданного числа четырехзначного числа сумме двух его последних цифр
Написать программу, позволяющую определить, равна ли сумма двух первых цифр заданного числа четырехзначного числа сумме двух его последних...

Вывести трехзначные числа, у которых разность 3-ей и 1-ой цифр равна 2-ой цифре
Вывести на экран такие трехзначные числа , у которых разность 3 и 1 равна 2 цифре


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf
8Observer8 01.02.2026
Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .
SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли
8Observer8 30.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm
8Observer8 30.01.2026
Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .
SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 29.01.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .
Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT
bedvit 28.01.2026
Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .
SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 28.01.2026
Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .
SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL3_image
8Observer8 27.01.2026
Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .
Влияние грибов на сукцессию
anaschu 26.01.2026
Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru