Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
medinehuseynzade
24.05.2021 05:45 •
Информатика
Определить последнюю цифру заданного целого числа в pascal
Показать ответ
Ответ:
123456ададмлмм
16.07.2020 11:24
Var s,t:integer;
begin
write ('s='); readln(s);
if (s>-10) and (s<10)
then writeln ('Число однозначное')
else begin
t:=s mod 10;
writeln (abs(t));
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
shybite
21.07.2022 21:41
1. Напишите названия фруктов, используя тип кортеж. Замените стоящий на 2-м месте фрукт налибо число. Какую ошибку показала программ2. Создайте словарь для названий государств...
Скотч7Рулит
25.01.2020 16:42
Случайным образом из интервала [1, 100]. Вычислите и выведите результат:1. Сумму всех четных значений элементов массива (S1).3. Значение наибольшего элемента в массиве (max).2....
nigina8807
17.05.2020 02:45
Таблица по информатике. Свойства Моделирования сделать 3 и 4 таблицу...
nadir7207
10.07.2022 16:59
Для проверки нужно прислать колы программ и результаты их работы. . РЕБЯТА в школе у меня не было информатики. Я совсем не понимаю ничего. Решите даю 15б...
Dori48486
26.10.2020 13:16
1)Определите значение переменной b после выполнения фрагмента алгоритма. 2)Определите значение переменной k после выполнения фрагмента алгоритма 3)Определите значение переменной...
Sone4ka1111
16.06.2022 23:39
Запишіть погляди протестантських лідерів щодо діяльності католицької церкви...
Ak1se
18.09.2021 18:59
220Б. Прочитайте отрывок без выделенных слов. Понятен ли он вам? Для чего служат эти слова? Можно ли к ним задать вопрос? Являются ли они членами предложения? 221. Заполните...
knestor
04.07.2022 14:29
2.4 Circle the correct option to complete these sentences. 1. The 10:43 train from Oxford takes 58 minutes / 1 hour 7 minutes / 1 hour 11minutes,2. The 10:43 train from Oxford...
Ali0429
03.05.2021 18:24
Можно ответ Чтобы волосы не падали на лицо, Никита повязал их веткой березы (Горьк.); Чтоб определить свое отношение к другому человеку, полезно знать, что за человек ты сам (А. Крон); Чтобымузыка стала вашим...
NikiMimi98
20.03.2020 02:19
На карте океанов отметьте озёра Верхнее, Гурон, Мичиган, Эри, Онтарио...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
write ('s='); readln(s);
if (s>-10) and (s<10)
then writeln ('Число однозначное')
else begin
t:=s mod 10;
writeln (abs(t));
end;
end.