ФТ
Фурсова Татьяна

Составить программу нахождения суммы первой, третьей, пятой цифры заданного пятизначного числа (Паскаль)

Составить программу нахождения суммы первой, третьей, пятой цифры заданного пятизначного числа (Паскаль)

Помогите!!)

АН
Андрей Носырев

Program my_1;
var a:10000..99999;
begin
read(a);
write('Сумма 1-ой, 3-ей. 5-ой цифры заданного числа='a div 10000+ a mod 10 + a mod 1000 div 100);
end.

Похожие вопросы
паскаль. определить, равен ли квадрат заданного четырехзначного числа кубу суммы цифр этого числа
Решить задачу через Паскаль. Дано трёхзначное число. Составить программу для нахождения произведения цыфр этого числа.
Написать программу в pascal. Составить программу определения количества цифр в заданном целом числе.
СОСТАВИТЬ ПРОГРАММУ В ПАСКАЛЕ. Составить программу вычисления суммы конечного ряда.
Составить программу нахождения первого члена последовате
нужна помощь програмистов в турбо паскале :Составить программу, которая выводит на экран третью цифру заданного четырехз
Паскаль (нахождение цыфр в числе)
задано натуральное число n. Найти сумму цифр данного числа с помощью функции !!!(паскаль)
Составить программу для нахождения суммы по следующей формуле:
Определить, равна ли сумма двух первых цифр заданного четырехзначного числа сумме двух его последних цифр в Delphi