Найти сумму первой и последней цифры натурального числа N

@viktoria99 · Регистрация: 19.01.2017

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

@Puporev · 24.01.2017, 10:13

Pascal

var n,p:integer;
begin
writeln('Введите натуральное число n=');
readln(n);
if n<10 then write('Сумма первой и последней цифр=',n)
else
 begin
  p:=n mod 10;
  while n>10 do
  n:=n div 10;
  write('Сумма первой и последней цифр=',n+p);
 end;
end.

@viktoria99 0 / 0 / 0 Регистрация: 19.01.2017 Сообщений: 19
		1
	Найти сумму первой и последней цифры натурального числа N 23.01.2017, 21:07. Показов 19510. Ответов 1 Метки нет (Все метки) Найти сумму первой и последней цифры натурального числа N 0

Опции темы

Найти сумму первой и последней цифры натурального числа N

Решение