Напишите программу, запрашивающую пин-код для банковской карты в виде четырехзначного числа. Считая, что в правильном пин-коде сумма первых двух цифр должна равняться сумме двух последних, выводя в случае ввода неправильного пин-кода соответствующее сообщение написать программу в Pascal ;(
159
161
Ответы на вопрос:
pascal
Объяснение:
program pincode;
var
pin: integer;
begin
repeat
Write('Введите PIN-код: ');
ReadLn(pin);
until (length(inttostr(pin)) = 4);
if (pin div 1000 + (pin mod 1000) div 100) = ((pin mod 100) div 10 + pin mod 10)
then WriteLn('PIN-код верен!') else WriteLn('PIN-код неверен!');
end.
Var a: array[1..10] of integer; i: integer; begin writeln('массив '); for i : = 1 to 10 do begin a[i] : = random(10); write(a[i], ' '); end; writeln; writeln('числа и их индекс (по условию)'); for i : = 1 to 10 do if i > a[i] then write('(', a[i], ' - ', i, ') '); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
zaraza899916.02.2023 23:13
-
Ziko8888103.10.2020 04:35
-
ДианаИванова1113.06.2020 11:14
-
nadyukov18.01.2022 04:58
-
nikav92com22.01.2020 14:33
-
comr4de04.04.2022 17:44
-
oolesyoooolesy12.03.2020 22:24
-
кира1973281986314.10.2021 13:41
-
elizavetamilas01.07.2021 01:43
-
vikaSnal8711.04.2022 16:53
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.