Как в паскале найти сумму двузначных чисел
Перейти к содержимому

Как в паскале найти сумму двузначных чисел

  • автор:

Найти сумму сумм цифр двух двузначных чисел

Author24 — интернет-сервис помощи студентам

Входные данные:
Во входном потоке заданы два целых двухзначных числа.

Выходные данные:
В выходной поток вывести единственное целое число.

Пример входного файла (input.txt):
32 65

Пример выходного файла (output.txt):
16

Лучшие ответы ( 1 )
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
Ответы с готовыми решениями:

Вычислить сумму первых двух цифр и сумму последних двух цифр числа. Определить какая из найденных сумм больше.
дано четырёхзначное число N. Вычислить сумму первых двух цифр и сумму последних двух цифр числа.

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

Найти сумму и произведение последних цифр двух чисел.
Даны натуральные числа m и n.Найти сумму и произведение их последних цифр.

Найти сумму и производную от последних цифр двух данных чисел
Даны натуральных числа m и n. Найти сумму и производную от последних цифр.

Платежеспособный зверь
8906 / 4338 / 1636
Регистрация: 28.10.2009
Сообщений: 11,521

Лучший ответ

Сообщение было отмечено Divanijiversant как решение

Решение

1 2 3 4 5 6
var a,b:integer; begin readln(a,b); writeln(a div 10+a mod 10+b div 10+b mod 10; end.

87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
Помогаю со студенческими работами здесь

Найти произведение и сумму двузначных нечетных чисел, кратных 23
Нужно решить эти задачи без массивов и с вхаил 6. Найти произведение и сумму двузначных нечетных.

Среди двузначных чисел найти те, сумма цифр которых равна n(0Среди двузначных чисел найти те, сумма цифр которых равна n(0<n<=18) и число делиться без остатка.

Вычислить сумму цифр двух четырехзначных чисел
Вычислить сумму цифр двух четырехзначных чисел. При этом оба числа должны быть строго.

Найти сумму всех двузначных чисел, которые делятся на 3 и не делятся на 4
Помогите решить 3 задачи на циклы на паскале, а то забыл их совсем 1 Найти 10 произвольных целых.

Или воспользуйтесь поиском по форуму:

Разработчику о работе с 1С:Предприятие, Pascal, Паскаль

Решение вопросов, возникающие при автоматизации учета с помощью 1С:Предприятие. Паскаль.

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

17.05.2017 | Автор Дмитрий

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

program Sum_Num1_Num2_Task; // Найти сумму цифр двузначного числа в паскале var i_NUm, i_NUm1, i_NUm2: integer; i_SumNUm: integer; begin i_SumNUm := 0; i_NUm := 48; i_NUm1 := i_NUm div 10; i_NUm2 := i_NUm mod 10; i_SumNUm := i_NUm1 + i_NUm2; // Вывод чисел на экран Writeln('Исходное число: ', i_NUm, ', первая цифра: ', i_NUm1, ', вторая цифра: ', i_NUm2); // вывод суммы цифр двузначного числа Writeln('Сумма цифр: ', i_SumNUm); //завершение работы программы WriteLn('Нажмите , чтобы выйти.'); ReadLn(); end.  

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

Рубрика: Pascal (Паскаль) — задачи и решения

Разработчику о работе с 1С:Предприятие, Pascal, Паскаль

Решение вопросов, возникающие при автоматизации учета с помощью 1С:Предприятие. Паскаль.

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

17.05.2017 | Автор Дмитрий

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

program Um_Num1_Num2_Task; // Дано двузначное число. Найти произведение его цифр в паскале. var i_NUm, i_NUm1, i_NUm2: integer; i_UmNUm: integer; begin WriteLn('Ввод двузначного числа:'); ReadLn(i_NUm); i_NUm1 := i_NUm div 10; i_NUm2 := i_NUm mod 10; i_UmNUm := i_NUm1*i_NUm2; // Вывод чисел на экран Writeln('Исходное число: ', i_NUm, ', первая цифра: ', i_NUm1, ', вторая цифра: ', i_NUm2); // вывод: произведение цифр двузначного числа Writeln('Произведение цифр: ', i_UmNUm); //завершение работы программы WriteLn('Нажмите , чтобы выйти.'); ReadLn(); end.  

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

Рубрика: Pascal (Паскаль) — задачи и решения

Как в паскале найти сумму двузначных чисел

Помогите пожалуйста решить задачу очень нужна вот условие её

дано число N. (0≤N≤ 9). Написать программу, которая будет вычеслять сумму всех двузначных чисел в которых нет числа N

Регистрация: 12.11.2010
Сообщений: 8,570
Что не получается? Сами пытались?

Вадим Мошев
Посмотреть профиль
Найти ещё сообщения от Вадим Мошев

Высокая репутация
СуперМодератор
Регистрация: 27.07.2008
Сообщений: 16,192

Наверное, не числа N, а цифры N.
Первая цифра: A mod 10, вторая цифра: A div 10. Далее в цикле for i:=10 to 99 do сравнивайте первую и вторую цифры с N, если не совпадают, то увеличиваем сумму: S:=S+i

Регистрация: 21.10.2014
Сообщений: 4

вот как выгледит оригинал задачи

Дадзены целы лік N (0≤N≤ 9). Написать праграму, якая буде выличвать суму усих двухзначных ликаў? у яких няма личбы N.

я просто перевел)

Регистрация: 12.11.2010
Сообщений: 8,570
Это белорусский язык что ли?

Вадим Мошев
Посмотреть профиль
Найти ещё сообщения от Вадим Мошев

Регистрация: 21.10.2014
Сообщений: 4
угу грусть печаль(
Регистрация: 12.11.2010
Сообщений: 8,570
вам же сказали, как решать?

Вадим Мошев
Посмотреть профиль
Найти ещё сообщения от Вадим Мошев

Регистрация: 21.10.2014
Сообщений: 4
а можете написать полностью код задачи)
Высокая репутация
СуперМодератор
Регистрация: 27.07.2008
Сообщений: 16,192
Тут пишут полностью: Фриланс (но не за спасибо). А помочь решить не предполагает решить за вас.
Регистрация: 12.11.2010
Сообщений: 8,570
iceKirito
У меня в подписи ссылка. Напишу код, задача простая до жути, будет совсем недорого.

Вадим Мошев
Посмотреть профиль
Найти ещё сообщения от Вадим Мошев
Страница 1 из 2 1 2 Следующая >
Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
правильно ли решена задача: Найти сумму всех элементов массива целых чисел, удовлетворяющих условию: остаток от деления . Тишуня Паскаль, Turbo Pascal, PascalABC.NET 15 15.03.2014 14:38
Вычислить сумму всех положительных чисел одномерного массива (программа на алгоритмическом языке) ВиталийА Помощь студентам 8 01.10.2012 00:28
Вычислить сумму всех простых чисел denicko Помощь студентам 0 27.10.2010 20:46
Из всех двузначных чисел. Joker

Паскаль, Turbo Pascal, PascalABC.NET 2 15.09.2010 19:59
Вычислить сумму всех четных чисел в векторе malova Microsoft Office Excel 2 31.05.2010 09:09

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *