Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal ABC Программирование с использованием основных операций с матрицами https://www.cyberforum.ru/ pascalabc/ thread1905971.html
Программу и блок схему Заданы три матрицы A,B,C. Вычислить матричное выражение a*a-c*(b+c*a)
Программирование с использованием динамических структур Pascal ABC
Дан список вещественных чисел. Написать следующие функции:1)Вычисления, 2)добавления элемента,равного среднему арифметическому элементов списка за максимальным элементом списка.
Pascal ABC Программирование алгоритмов решения системы алгебраических уравнений https://www.cyberforum.ru/ pascalabc/ thread1905961.html
Написать программу по решению системы алгебраического уравнения,используя метод Крамера! система 1.1*{x}_{1}+11.2*{x}_{2}+11.1+{x}_{3}-13.1*{x}_{4}=1.3 -3.3*{x}_{1}+1.1*{x}_{2}+30.1+{x}_{3}-20.1*{x}_{4}=1.1 7.5*{x}_{1}+1.3*{x}_{2}+1.1+{x}_{3}+10*{x}_{4}=20 1.7*{x}_{1}+7.5*{x}_{2}-1.8+{x}_{3}+2.1*{x}_{4}=1.1
Pascal ABC Вычислить выражение, создав функцию для вычисления факториала произвольного натурального числа Найти (a! + b!)/(a+b)!, создав функцию для вычисления факториала произвольного натурального числа. https://www.cyberforum.ru/ pascalabc/ thread1905958.html
Программирование с использованием модулей Pascal ABC
Создать модуль , содержащий следующие подпрограммы: сортировки одномерного массива поиск заданного элемента массива определения суммы элементов массива Используя модуль,отсортировать элементы одномерного массива , располагающие после минимального элемента.
Pascal ABC Вычисление производной функции https://www.cyberforum.ru/ pascalabc/ thread1905909.html
Вычислить первую и вторую производную заданных функций. (в одной программе ) f(x)=\frac{3-cosx}{3+sinx} f(x)=\frac{{e}^{x}-{e}^{-x}}{2}
Pascal ABC Определить, является ли строка палиндромом Написать рекурсивную функцию, определяющую является ли палиндромом строка, передаваемая в качестве параметра. Проверить правильность работы на нескольких примерах. https://www.cyberforum.ru/ pascalabc/ thread1905904.html Pascal ABC Сформировать вектор из максимумов элементов диагоналей матрицы, параллельных главной
По заданной квадратной матрице размером n*n построить вектор длиной(2n-1), элементы которого являются максимумами элементов диагоналей , параллельных главной диагонали. Использовать процедуру(или функцию) нахождения максимального элемента в последовательности из m чисел.
Pascal ABC Массивы https://www.cyberforum.ru/ pascalabc/ thread1905741.html
(Вложение удалено)
Pascal ABC Чтение записи из файла Всем добрый день! Помогите разобраться с лабой, никак не могу на этом прекрасном языке программированния реализовать. Собственно задание: Вывести на экран список студентов заданной группы, родившихся не ранее заданного года. program Laba2_ASD; uses crt; Type Student = record Name: string; Age: integer; https://www.cyberforum.ru/ pascalabc/ thread1905710.html
Программирование и работа с записями Pascal ABC
Написать программу ! Срочно ! Составить инвентарную ведомость склада , включив следующие данные : вид продукции , стоимость , сорт, количество . Переставить записи в порядке увеличения стоимости товара .
Pascal ABC Определить в заданной последовательности целых чисел количество чисел Фибоначчи Определить в заданной последовательности целых чисел количество чисел Фибоначчи. https://www.cyberforum.ru/ pascalabc/ thread1905392.html
Почетный модератор
64291 / 47589 / 32740
Регистрация: 18.05.2008
Сообщений: 115,181
24.01.2017, 10:13 0

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

24.01.2017, 10:13. Показов 19820. Ответов 1
Метки (Все метки)

Лучший ответ Сообщение было отмечено viktoria99 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
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.


Вернуться к обсуждению:
Найти сумму первой и последней цифры натурального числа N Pascal ABC
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
24.01.2017, 10:13
Готовые ответы и решения:

Найти сумму первой и последней цифры числа
найти сумму первой и последней цифры любого положительного натурального числа! Помогите!!!

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

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

Дано натуральное число n. Найти сумму первой и последней цифры этого числа
6)дано натуральное число n. Найти сумму первой и последней цифры этого числа

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

Найти сумму первой и последней цифры в десятичной записи целого неотрицательного числа n (без использования строк)
Найти сумму первой и последней цифры в десятичной записи целого неотрицательного числа n (без...

Определите сумму первой и последней цифры числа
Задано натуральное многозначное число. Определите сумму его первой и последней цифры, первой и...

Циклические конструкции: Найти сумму первой и последней чифры данного числа
Дано натуральное число n. Найти сумму первой и последней чифры этого числа! Помогите тоже...

Найти сумму наибольшей и наименьшей цифры в записи данного натурального числа
Составить программу для решения следующей задачи :Найти сумму наибольшей и наименьшей цифры в...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru