Дано натуральное четырехзначное число,верно ли, что все его цифры различны? написать программу.
milena162
3
27.03.2019 21:30
12
Другие вопросы по теме Информатика
мозг2017а
17.05.2020 14:01
REIIKA
17.05.2020 14:01
dasha098685674
17.05.2020 14:02
genyaryabinina
17.05.2020 14:02
trofimka31
17.05.2020 14:02
Шоколадикус
09.12.2020 08:27
saimon0
09.12.2020 08:25
Няша200411
04.09.2020 22:18
omim
04.09.2020 22:26
Популярные вопросы
- СЛИВ ЕЕЕЕБОЙОЙОЙОЙОЙОЙОЙО...
1 - Прямоугольный треугольник вращается вокруг своего меньшего катета. Определи...
1 - Что объединяет картины балет невылупившихся птенцов прогулка и Богатырские...
1 - Как быстро выучить слова в немецком языке ...
2 - Точка 2 расположена на территории крупного географического объекта. Прочитайте...
1 - 2. Соотнесите: 1. условные рефлексы А. высшая форма при к условиям среды,...
3 - Вегатативті көбею тәсілдері қандай? Өсімдіктермен мысал келтіріңіз....
3 - Визначити енергію фотона фіолетового світла з довжиною хвилі 400 нм а)4,965аДж...
1 - 1. Какая из пословиц наиболее точно передаёт главную мысль текста? 1.Доброе...
1 - Урал древняя Горная система а Кавказ молодая.Верно или нет пззз...
3
var a,b,c,d,e:integer;
begin
read(a);
b:=a mod 10;
a:=a div 10;
c:=a mod 10;
a:=a div 10;
d:=a mod 10;
a:=a div 10;
e:=a mod 10;
if (b<>c) and (b<>d) and (b<>e) and (c<>d) and (c<>e) and (d<>e) then write('net povtorov')
else write('est povtori');
end.