1) дано число. получить новое число с обратным значением цифр , где 0→9, 1→8, 2→7, 3→6, 4→5, а цифры 5, 6,7,8,9 не изменяются . (например, число 1379 перепишем как 8679) 2) триморфное число — число, запись куба которого оканчивается цифрами самого этого числа. например, 43 = 64, 243 = 13 824, 2493 = 15 438 249. определить, является ли введенное число тримоформным.
daria19802
1
02.06.2019 07:00
1
Другие вопросы по теме Информатика
ayshahajiverdiyeva
19.05.2019 15:40
minikolp12344
19.05.2019 15:40
polinaaksd
15.09.2021 23:39
CURTER
15.09.2021 23:39
Амина762
15.09.2021 23:43
nadiacolupaeva
15.09.2021 23:44
denisbutrik
13.04.2020 11:19
Nutmi
17.02.2020 11:36
AgataKlemen03
17.02.2020 10:13
Популярные вопросы
- Искусственные спутники Земли обращаются вокруг нее либо по кругам, и...
2 - В какое время суток и в каком направлении выгоднее всего запускать с...
2 - Устраивать такие (космические) городки будут на разных высотах, но расстояние...
3 - Какая часть солнечного диска - верхняя или нижняя - была закрыта Луной...
3 - В 4ч. 10мин. облако скрыло от наших взоров Солнце. И когда в 4ч. 31мин....
1 - Почему приливы и отливы продолжаются не по 12ч, а по 12ч. 25мин.?...
1 - Каковы бывают приливы и отливы в дни солнечных и лунных затмений? Почему?...
1 - Какую фазу Луны напоминает солнечный диск в начале полного затмения?...
1 - Вот два отрывка из одной повести о Марсе: Вовка пошарил глазами по небосводу....
1 - В каком направлении проходит Луна через земную тень во время лунных...
3
b:integer;
begin
writeln ('введи число');
readln (a);
while a>0 do begin
b:=a mod 10;
case b of
0: b:=9;
1: b:=8;
2: b:=7;
3: b:=6;
4: b:=5;
end;
h:=h*10+b;
a:=a div 10;
end;
a:+0;
while h>0 do begin
b:=h mod 10;
a:=a*10+b;
h:=h div 10;
end;
writeln (a);
readln;
end.