Люди, нужна ваша помощь, используя программу Pascal. Незнающих прошу пройти мимо. Следует составить 2 программы согласно 2 заданиям ниже :)
(ввод с клавиатуры)
1) Найдите сумму первой и последней цифр четырехзначного числа.
2) Записать четырехзначное число в обратном порядке.
(ввод с клавиатуры)
1) Найдите сумму первой и последней цифр четырехзначного числа.
2) Записать четырехзначное число в обратном порядке.
More Questions From This User See All
Answers & Comments
// Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger('Введите четырехзначное число');
Writeln('Сумма первой и последней цифры равна ',n div 1000+n mod 10);
Writeln('Реверс числа: ',n.ToString.Inverse)
end.
Пример
Введите четырехзначное число 5719
Сумма первой и последней цифры равна 14
Реверс числа: 9175