tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Определить последнюю цифру заданного
Определить последнюю цифру заданного целого числа в pascal
MrTroLoLo10
3 20.06.2019 10:40
1
Ответы
ks907216
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
MakkDuo
29.08.2019 23:10
Много два целых числа одной чётности, вмещающихся в 32-битный тип данных со знаком. первое из чисел не больше второго. найти середину отрезка между этими числами. разрешается...
Xxxin
11.07.2019 23:20
Pascal.дана строка. подсчитать и вывести количество слов, первое и последнее слово...
Vova77723
17.01.2020 04:19
Найдите матрицы смежности и инцидентности графов...
djonni74
27.05.2019 00:10
Найти максимальных элемент в массиве размерностью м*т.м и n вводятся с клавиатуры. (паскаль)...
Валерия1804
27.05.2019 00:10
Часы с боем бьют каждый час столько раз, сколько часов показывает часовая стрелка, а когда минутная стрелка показывает полчас-один раз. выберите временной диапазон, в котором...
rezaev1
27.05.2019 00:10
Вмассиве из 20 целых чисел найдите наибольший элемент среди отрицательных и поменяйте его местами с первым элементом. вот начал делать, а потом не знаю как дальше: const k=20;...
motay121
27.05.2019 00:10
Как называется устройство модуляции и демодуляции...
dianag141517
10.09.2020 11:54
1)Абай кімдердің шығармалардың аударған? 2)Крыловтан қандай мысалдарды аударуға? 3)Абай қай жылы қайтыс болды?...
varvaralikhtsr
10.09.2020 11:55
Задание 1. Перечислите этапы планирования исследования Задание 2. 1. Выберите объект для исследования (дерево, собака, муравей и тд.) 2. Составьте план исследования 3. Опишите...
DuRaDoN2017
10.09.2020 11:48
1. Определите валентности атомов в формулах веществ: Br2, CaO , SiO2, CuO , Cu2O , Н2, , FeO , Fe , Fe2O3. 2. Определите степени окисления атомов в неорганических соединениях:...
Популярные вопросы
УМОЛЯЮ ЗАДАЧА ПО ТЕОРИИ ВЕРОЯТНОСТИ Вероятность того, что необходимо студенту...
3
Написать не менее 7 предложений о своём любимом мультфильме,не называя...
3
в чем вы видете доказательство того, что влияние России полностью распространилось...
1
Суждение «Львы, гепарды относятся к семейству кошачьих» являетсяЛОЖНЫМИСТИННЫМ...
2
Составьте на языке программирования Паскаль программу, которая считает...
1
Нормою вологості повітря людської оселі, за твердженням фахівців, вважаєть-...
2
Природное соединение Содержащие ионы магния...
1
4 ЧАСТЬ afternoons, often with a mug of hot chocolate beside her. It waspleasant...
1
Соотнеси слова и их значения в таблицу. русская литература...
1
Световые эффекты (3) из рассказа бежин луг...
1
begin
write ('s='); readln(s);
if (s>-10) and (s<10)
then writeln ('Число однозначное')
else begin
t:=s mod 10;
writeln (abs(t));
end;
end.