Написать программу на pacal abc и составить блок-схему этой программы. : проверить истинность высказывания: "все цифры данного трехзначного числа различны" программа должна выводить либо true либо false. (с типа: boolean) зараннее !
маруська62
1
22.05.2019 09:10
0
Другие вопросы по теме Информатика
kukolkabarb
14.06.2019 20:20
1964hade
14.06.2019 20:20
dimapavlov2007
14.06.2019 20:20
vikarubachok
14.06.2019 20:20
deniza0906
14.06.2019 20:20
Danila5555
14.06.2019 20:20
mizery1
14.06.2019 20:20
murenko20061
14.06.2019 20:20
Поглит
14.06.2019 20:10
Популярные вопросы
- Население города в начале первого года составляло 150 000 человек. в конце...
3 - Напишите рассказ про россию на языке,и напишите перевод....
3 - От какого слова образовалось слово чистотел?...
1 - Стенки термоса делают двойными, причем между ними вакуум, а внутренние поверхности...
2 - Найдите предложения с неверной пунктуацией. * а) никого осуждать она не имеет...
3 - Вычислить 3 метра 40 сантиметров плюс 70 сантиметров минус 20 см умноженное...
3 - Решите систему уравнение x-y=4 - первая стока x^2+y=10 - вторая строка...
3 - С. вот словом можно убить , смертельно обидеть, с слова можно поднять дух...
1 - Катер расстояние между пристанями по течению реки за 2 часа,а обратный-за...
3 - Начерти прямоугольник,ширина которого равна 2 см,а длина в 3 раза больше .на...
1
uses crt;
var
x:integer;
y:boolean;
begin
clrscr;
write('Введите трехзначное число'); read(x);
y:=((x mod 10)<>(x div 100))and
((x div 100)<>(x mod 100 div 10))and
((x mod 10)<>(x mod 100 div 10));
write(y);
end.