Входной замок Лисы Алисы работает следующим образом: если введено натуральное число, которое меньше 100 или больше 999 – на дисплее устройства появляется надпись «FALSE»; если у введённого числа сумма цифр равна 13 – появляется надпись «ENTER» и можно войти; в остальных случаях появляется надпись «LOCK». Входные данные: натуральное число N ( ). Выходные данные: необходимо вывести надпись, которая должна быть на дисплее. Пример: Ввод Вывод 2 FALSE 427 ENTER 318 LOCK
261
ОТВЕТЫ
Var
n,e,d,s,sum: integer;
begin
writeln (vvedi cislo n);
read (n);
if (nlt;100) or (ngt;999) then writeln (False);
if (ngt;100) and (nlt;999) then
begin
e:= (n mod 10);
writeln (e,e);
s:=(n div 100);
writeln (s,s);
d:=(n div 10)-s*10;
writeln (d,d);
sum:=s+d+e;
writeln (sum,sum);
if sum=13 then writeln (Enter)
else
writeln (Lock);
end;
end.
n,e,d,s,sum: integer;
begin
writeln (vvedi cislo n);
read (n);
if (nlt;100) or (ngt;999) then writeln (False);
if (ngt;100) and (nlt;999) then
begin
e:= (n mod 10);
writeln (e,e);
s:=(n div 100);
writeln (s,s);
d:=(n div 10)-s*10;
writeln (d,d);
sum:=s+d+e;
writeln (sum,sum);
if sum=13 then writeln (Enter)
else
writeln (Lock);
end;
end.
1
Отв. дан
Anargas
Для написания вопросов и ответов необходимо зарегистрироваться на сайте
Другие вопросы в разделе - Математика
Дмитрий
Спиши текст,вставляя пропущенные буквы и расставляя знаки препинания при ...
2018-09-23 00:00:00
Arirn
Нельзя преобразовать тип integer к char. Как это исправить? ...
2018-09-23 00:00:00
Gadwyn
Определите число которое не является делителелем числа 108 A) ...
2018-09-23 00:00:00
Umgar
Про кого з героiв "iнститутка" говориться: "сказано, добрий пан ...
2018-09-23 00:00:00