Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
ДарьяТихонюк
21.05.2023 22:41 •
Информатика
Напишите программу на языке паскаль для решения следующей : для любого трехзначного вводимого числа найти сумму первой и последней цифры. (подсказка. используйти тип данных integer и операции div и mod)
Ответ:
sashabayanov
18.09.2020 13:53
//Мне ещё подсказки дают?
var n,n1,n3:integer;
begin;
readln(n);
n1:=n mod 10;
n:=n div 10;
n:=n div 10;
n3:=n mod 10;
writeln(n1+n3);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
llovepet20
21.11.2020 10:47
Какие программы нельзя отключать на windows 7 возле часиков...
яблоко50
21.11.2020 10:47
Требуется написать программу, определяющую, является ли четырехзначное натуральное число n палиндромом, т.е. числом, которое одинаково читается слева направо и справа налево. входные...
udekhdhdj
21.11.2020 10:47
Информатика 7 класс. 1. из 100 туристов, отправляющихся в заграничное путешествие, языком владеют 30 человек, - 28, французским - 42. и одновременно владеют 8 человек, и французским...
diasj5kz
22.08.2022 16:23
Выполните вычктание: а) 25e6 в 16 системе счисления - 1b15 в 16 системе счисления. б) 2023 в 8 системе счисления - 547 в 8 системе счесления. в) 111010 в 2 системе счисления - 1101001...
Qulya11
22.08.2022 16:23
На месте преступления были обнаружены четыре обрывка бумаги. следствие установило, что на них записаны фрагменты одного ip-адреса. криминалисты обозначили эти фрагменты буквами...
Tanya6164
05.04.2021 17:37
Составить сложную таблицу в openoffice: территория австралии и океании — 8,5 млн. кв. км. плотность населения в африке в 1989 г. была 21 человек на кв. км. население европы в 1989...
nastya3454578335678
04.02.2022 00:16
5примеров комбинированной информации....
serp3246
16.01.2020 03:50
Требуется написать программу которая по числу n(1...
azia2995
16.01.2020 03:50
Дано число х приьавьте к этому числу 3 если х больше или равно 5,5...
Zagonov
30.01.2021 14:11
1) запишите порядок установки нового программного обеспечения с 2)запишите порядок установки или обновления программного обеспечения из загруженного файла 3)перечислите причины...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var n,n1,n3:integer;
begin;
readln(n);
n1:=n mod 10;
n:=n div 10;
n:=n div 10;
n3:=n mod 10;
writeln(n1+n3);
end.