tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Написать функцию, которая
Написать функцию, которая возвращает сумму первой и последней цифр входящих в запись числа типа longint .
FACE091
1 09.09.2019 02:00
0
Ответы
darina2605
09.09.2020 22:37
Function f(x:longint):integer;
var s:integer;
begin
s:=x mod 10;
while x>9 do x:=x div 10;
f:=s+x;
end;
begin
writeln(f(6120879));
end.
Результат:
15
ПОКАЗАТЬ ОТВЕТЫ
света9710
09.09.2020 22:37
Var x:longint; k,s:integer;
begin
readln(x);
s:=x mod 10;
while x>0 do begin
k:=x mod 10;
x:=x div 10;
end;
s:=s+k;
writeln(s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
НастяТептюк
16.05.2021 20:20
задания по информатике Подготовить реферат в текстовом документе на тему Казахстан многонациональное государство.Указать ссылки...
Сникерс11
16.05.2021 20:20
, напишите в экселе в компе решение номера 7 Заранее...
saimon0
16.05.2021 20:20
Напишите программу для решения задачи: Пользователь вводит 7 чисел, программа их обрабатывает и выводит количество четных чисел ЯЗЫК:ПИТОН...
NaTaShA0930
17.03.2021 20:06
ответьте на вопросы: 1) Какие условия называются простыми? 2) Если оба простые условия верны, то какая логическая используется? 3) Если верно одно из условий, то...
Неня2003
17.03.2021 20:06
что будет в результате выполнения программы #include iostream using namespace std;int main (){int sum=0;for(int i=1;j =15;i++){...
kristavikown6tn
10.09.2020 01:25
Напишите сообщение на тему информатика...
Znv250605
21.10.2020 18:49
Является ли утверждением предложение Ты тетрадь не забыл взять? ...
Алика2018
21.10.2020 18:48
перевести на язык программирования....
dariadariadaria2
10.09.2019 02:30
Значення періодичного закону для розвитку природничих наук пліз 29...
kiraalexeyeva
10.09.2019 02:30
Былина – это … а) сказание о богатырях и событиях; б) хвалебное стихотворение, в котором прославляются заслуги того, кому оно посвящено; в) рассказ об событии; г)...
Популярные вопросы
Составить слово из двух: паром+ тире; мечта+ пони...
3
В магазине действует акция 《2+1》 для сырков со сгущёнкой, то есть...
3
Настя делала уборку в доме 50 минут.пока Пока она работала пришел...
2
Напишите вторую форму глаголов и заполните пропуски глаголом в...
3
19,6*дробь 2 целых 1 в верху 2 в низу -(2,0625-дробь 1целая 5...
3
5. Раздели слова на 3 группы по типу склонения: приключение гордость...
3
Число А составляет 20% от числа В, а число В составляет 20% числа...
3
Автобус проехал 4 дробь 17 дороги .каковадлина дороги если он...
3
На рисунке 2.4 изображен куб, сложенный из 8 маленьких одинаковых...
3
Стоимость доставки мебели составляет 450 рублей, а за доставку...
3
var s:integer;
begin
s:=x mod 10;
while x>9 do x:=x div 10;
f:=s+x;
end;
begin
writeln(f(6120879));
end.
Результат:
15
begin
readln(x);
s:=x mod 10;
while x>0 do begin
k:=x mod 10;
x:=x div 10;
end;
s:=s+k;
writeln(s);
end.