Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
vckdkskk
30.01.2023 00:36 •
Информатика
Составить программу на языке паскаль, которая запрашивает у пользователя некоторое число (число больше 9 и меньше 30000) и выводит на экран последнюю цифру числа (цифру в самом младшем разряде числа)
Ответ:
dimon5434
08.10.2020 12:12
Var a:Integer;
begin
write('Введите число: ');
ReadLn(a);
WriteLn('Последяя цифра числа: ' , a mod 10)
end.
0,0
(0 оценок)
Ответ:
EEEboyyyyy
08.10.2020 12:12
Var
chislo, res: longint;
Begin
write('Введите число: ');
read(chislo);
res := chislo mod 10;
writeln('Последяя цифра числа: ' , res);
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
Ольгаok
27.11.2020 03:31
8 КЛАСС, НА ПИТОНЕ Напишите программу, которая получает с клавиатуры натуральное число и находит наименьшую цифру в его десятичной записи....
msflower05
11.01.2021 07:19
Каждому номеру символа компьютерного алфавита соответствует двоичный код. Сколько двоичных разрядов в этом коде? Выберите один ответ: восемь разрядов семь разрядов...
moderator14
05.03.2023 12:49
Запиши верный ответ, если дан алгоритм:...
nikzakora
25.02.2023 10:56
Ребята если кто то умеет работать с программой Pascal ABC...нужно решить задачи......
александр199110
22.06.2022 06:26
Информатика. Надо сделать блок-схему с фото. Я поставила цифры. И ниже написала чтобы писать в блок-смехе каждой цифре (для тех кто не знает украинский, так как мне...
sukalovan0
04.11.2022 10:37
Задание 7. С клавиатуры вводится строка содержащая целое число в десятичной системе счисления. Составьте программу реализирубщую вывод числа с разделением на триады...
Fhbhkdkd
11.09.2022 09:20
Сравните: а) 5/6 и 8/9; б) 3/7 и 0,4. запишите с подробным ответом и объяснением) заранее !...
елазевета
11.09.2022 09:20
Написать росказ на про спорт и здоровье....
vinerxasanzyan
11.09.2022 09:20
Написать стихотворение на тему: я б в пошел»...
Anzhelika35
11.09.2022 09:20
Запишите числа а)7/10; 30 целых 18/100; 4 целых 125/10000. в виде десятичной дроби. б)3,4; 1,05; 0,007.в виде обыкновенной дроби....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
write('Введите число: ');
ReadLn(a);
WriteLn('Последяя цифра числа: ' , a mod 10)
end.
chislo, res: longint;
Begin
write('Введите число: ');
read(chislo);
res := chislo mod 10;
writeln('Последяя цифра числа: ' , res);
End.