Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
CatTv2006
01.07.2021 15:35 •
Информатика
Дано натуральное число, определите последнюю цифру этого числа! напишите программу для паскаля вас! )
Ответ:
dobryninaaleksp08b5v
30.06.2020 18:57
Program chik;
var n,a:integer;
begin
read(n);
a:=n mod 10;
writeln(a);
end.
здесь mod 10 делаем чтобы найти остаток от деления n на 10
при этом мы находим последнюю цифру
а если mod 100 сделать 2 последные цифры
mod 1000 три последные цифры
и т.д
0,0
(0 оценок)
Популярные вопросы: Информатика
mannanova0202
05.09.2021 07:31
Нужно решить задачу в виде процедуры Паскаль. Даны три вещественных числа. Составить процедуру нахождения целой части числа. Найти сумму чисел которые получились...
ILiveYou
26.02.2021 00:03
Напишите программу, выводящую на экран изображение шахматной доски, где чёрные клетки изображаются звёздочками, а белые — пробелами. на visual basic....
denic9
07.07.2022 09:38
Целочисленным переменным a, b, c надо присвоить соответственно значения 1, 2 и 3. какой оператор ввода соответствует входному потоку 2 1 3? read (a, b, c) read b,...
Finik2100
07.06.2023 23:55
Написать программу, которая считывает текст из файла и определяет сколько в нем слов,состоящих из не более 4 букв.c++...
olgaocher
09.06.2020 19:53
Условный оператор: if(x 2)theny: =x+7elsey: =x−30. выбери действие, которое будет выполняться в случае истинности условия: y: =x+7 x 2 y: =x−30...
Alinakozlova2004
10.02.2023 01:57
Дан условный оператор: if(a 16)theny: =aelsey: =a+3.условием являетсяa 16y: =ay: =a+3все ответы верные...
annafycguvvv
21.01.2023 00:30
Является ли условным оператором следующая последовательность символов? if(x 8)theny: =x+8elsey: =x−8...
nyto4ek
13.03.2020 05:15
Срулетки, цена деления которой равна 1 см, измерили длину стола, она оказалась равна 2 м. определите относительную погрешность измерения...
bnhgj4p08xdt
15.06.2020 11:20
50 ! 1). необходимо провести робота по коридору шириной в одну клетку из начального положения (◊) до конца коридора, закрашивая при этом все клетки коридора, которые...
aiis171
17.03.2021 13:34
Напишите программу паскаль по этой : сколько ящиков весом 50 кг поместиться в машину если ее грузоподъемность 955 кг...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var n,a:integer;
begin
read(n);
a:=n mod 10;
writeln(a);
end.
здесь mod 10 делаем чтобы найти остаток от деления n на 10
при этом мы находим последнюю цифру
а если mod 100 сделать 2 последные цифры
mod 1000 три последные цифры
и т.д