Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Шуранька
16.04.2020 10:04 •
Информатика
Написать программу на pascal, которая сообщает о равенстве или не равенстве последних цифр трех заданных чисел. заранее . если можно, то с
Ответ:
DaNa1517
07.10.2020 17:35
//PascalABC.NET 3.3,сборка 1611 от 06.01.2018
//Внимание! Если программа не работает, обновите версию!
begin
var (a,b,c):=readinteger3('a,b,c->'); a:=a mod 10 ; b:= b mod 10;
c:=c mod 10;
if (a=b) and (b=c) then writeln('последних цифры равны ') else
writeln('последних цифры не равны ');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
crasheftf
20.09.2022 01:35
Даны два числа в десятичной системе счисления: х и у. перевести числа в заданные системы счисления, выполнить арифметические действия в заданной системе счисления. перевести результаты...
KimSuho01
14.12.2020 18:30
Реши . (ответ округли до целых). книга содержит 147 страниц. на каждой странице 37 строк. в каждой строке 59 символов (включая пробелы). найти информационный объём текста. ответ:...
Amin1402
20.09.2022 21:46
Создайте программу, на Python, которая подсчитывает количество введённого символа во введённой строке.Задача должна быть выполнена с использованием преобразования данных....
kazanetov
30.05.2021 09:41
1.Какие ошибки могут возникнуть в Python? 2. Как исправляются ошибки? 3. Значение SyntaxError.4. Значение NameError....
бог100001
01.07.2022 10:01
Х+(3,74х-1,474х) надо проверить нужен ответ ваши варианты при х=3...
ИЩЕ6
01.07.2022 10:01
Help me♡ в прямоугольном треугольнике высота, опущенная на гипотенузу, равна 6дм, а гипотенуза равна 12,5дм. найдите катеты треугольника....
УмнаяВыхухоль
01.07.2022 10:01
Дано квадратное уравнение. x^2+4.5x-14.9=0 x1+x2= x1*x2=...
vano22312231
01.07.2022 10:01
Дополни предложения словами с удвоенными согласными в корне слова: 1)около нашей школы если чудесная 2)из окон видна остановка. 3)в комнате летала пчела и громко школьников быстро...
larisa114
01.07.2022 10:01
Реферат про животных внесенных в красную книгу...
temka32984
01.07.2022 10:01
В2. запишите слово (термин), о котором идет речь. система земледелия, при которой в степных и лесостепных районах истощенные земли не распахивались в течение 20-30 лет, до тех пор,...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
//Внимание! Если программа не работает, обновите версию!
begin
var (a,b,c):=readinteger3('a,b,c->'); a:=a mod 10 ; b:= b mod 10;
c:=c mod 10;
if (a=b) and (b=c) then writeln('последних цифры равны ') else
writeln('последних цифры не равны ');
end.