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

Равна ли сумма двух первых цифр четырехзначного числа сумме двух последних цифр

30.04.2012, 00:18. Показов 3856. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Помогите пожалуйста, очень нужно, заранее благодарю!
Операции DIV и MOD
7. Определить, равна ли сумма двух первых цифр заданного четырехзначного числа сумме двух его последних цифр.
Операторы цикла
14. Найти степень числа А.
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
30.04.2012, 00:18
Ответы с готовыми решениями:

Сумма двух первых цифр заданного четырехзначного числа равна сумме двух его последних цифр
Здравствуйте. не могу решить некоторые задачи. можете помочь? II.Логические выражения Составить линейную программу, печатающую...

Выяснить, равна сумма двух первых цифр заданного четырехзначного числа сумме двух его последних цифр
Вывести на экран 1 или 0 в зависимости от того, равна сумма двух первых цифр заданного четырехзначного числа сумме двух его последних цифр.

Найти все четырехзначные числа, у которых сумма первых двух цифр равна сумме двух последних
Помогите решить. Описание метода решения, блок-схему алгоритма. Ввод данных должен осуществляться только из текстового файла Input.dat....

1
 Аватар для Владимир_ВМ
128 / 109 / 103
Регистрация: 16.05.2011
Сообщений: 340
30.04.2012, 03:06
Лучший ответ Сообщение было отмечено Алина111 как решение

Решение

Добавлено через 4 минуты
Pascal
1
2
3
4
5
6
7
8
9
//zadanie 7
var
a,sum1,sum2:integer;
begin
write('vvedite a=');read(a);
sum1:=a div 1000+(a div 100)mod 10;
sum2:=a mod 10+(a mod 100)div 10;
if sum1=sum2 then write('Da') else write('Net');
end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
30.04.2012, 03:06
Помогаю со студенческими работами здесь

Вывести на экран только те числа, у которых сумма первых двух цифр равна сумме двух последних
Дан массив из n натуральных четырехзначных чисел. Вывести на экран только те, у которых сумма первых двух цифр равна сумме двух последних.

Найти все 4-х значные числа, в которых сумма первых 2-х цифр равна сумме двух последних
Найти все 4-х значные числа в которых сумма первых 2-х цифр числа равна сумме третьей и четвертой цифр этого числа... procedure...

Выяснить,равно ли произведение двух первых цифр 4-х значного числа произведению 2х последних цифр
дано натуральное число N,количество цифр в котором не менее четырех.Выяснить,равно ли произведение двух первых цифр в этом числе...

Найти число, образованное перестановкой двух первых и двух последних цифр заданного числа
Дано четырехзначное число. Найти число, образованное перестановкой двух первых и двух последних цифр заданного числа. Например, из...

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


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Символьное дифференцирование
igorrr37 13.02.2026
/ * Логарифм записывается как: (x-2)log(x^2+2) - означает логарифм (x^2+2) по основанию (x-2). Унарный минус обозначается как ! */ #include <iostream> #include <stack> #include <cctype>. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image
8Observer8 10.02.2026
Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .
Установка Qt-версии Lazarus IDE в Debian Trixie Xfce
volvo 10.02.2026
В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru