Кононова-БЕСКРОВНАЯ
?>

Информатика 9 класс! ввести целое число и определить, верно ли, что в его записи есть две одинаковые цифры. пример: введите целое число: введите целое число: 1234 1224 нет. да. я попыталась сделать но вышло вот так: program qq; var a, b, c: integer; begin writeln ('введите целое число: '); read(a); while a< > 0 do begin; b: =a mod 10; a: =a div 10; if c=b then begin writeln('да'); end else c: =b; end; writeln('нет'); readln; end.

Информатика

Ответы

Petrosienko_Larisa,1908
Program nd;
var n, n1, d, d1: Integer;
b: Boolean;
begin
write('Введите число n; n>9: ');
readln(n);
b:= false;
while (n>9) and (not b) do
begin
d:= n mod 10;
n1:= n div 10;
while (n1>0) and (not b) do
begin
d1:= n1 mod 10;
b:= d1 = d;
n1:= n1 div 10;
end;
n:= n div 10;
end;
if b then writeln('Да')
else writeln('Нет');
end.
vikgor45

5. Из приведенных объектов укажите биогеоценоз.1) совокупность особей березы в лесу 2) популяция березы обыкновенной3) березовый пень с населяющими...

5. Из приведенных объектов укажите биогеоценоз.1) совокупность особей березы в лесу 2) популяция березы обыкновенной3) березовый пень с населяющими...

5. Из приведенных объектов укажите биогеоценоз.1) совокупность особей березы в лесу 2) популяция березы обыкновенной3) березовый пень с населяющими...

5. Из приведенных объектов укажите биогеоценоз.1) совокупность особей березы в лесу 2) популяция березы обыкновенной3) березовый пень с населяющими...

5. Из приведенных объектов укажите биогеоценоз.1) совокупность особей березы в лесу 2) популяция березы обыкновенной3) березовый пень с населяющими...

5. Из приведенных объектов укажите биогеоценоз.1) совокупность особей березы в лесу 2) популяция березы обыкновенной3) березовый пень с населяющими...

5. Из приведенных объектов укажите биогеоценоз.1) совокупность особей березы в лесу 2) популяция березы обыкновенной3) березовый пень с населяющими...

5. Из приведенных объектов укажите биогеоценоз.1) совокупность особей березы в лесу 2) популяция березы обыкновенной3) березовый пень с населяющими...

ммм5. Из приведенных объектов укажите биогеоценоз.1) совокупность особей березы в лесу 2) популяция березы обыкновенной3) березовый пень с населяющими...

↓↑∴⊃÷

Объяснение:

Ivanova.i.bkrasheninnikov
F = ¬X +Z⇒(X+¬Y)
таблица истинности:
X Y Z     X+¬Y   Z⇒(X+¬Y)    ¬X      F
0  0  0      1             1                1       1
0  0  1       1            1                1       1
0  1  0       0            1                1       1
0  1  1       0            0                1       1
1  0  0      1             1                0       1
1  0  1       1            1                0       1
1 1   0       1            1                0       1
1  1  1      1             1                0       1
F =1 тождественно истинна ,
 так как её значения равны 1 при любых X,Y,Z

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Информатика 9 класс! ввести целое число и определить, верно ли, что в его записи есть две одинаковые цифры. пример: введите целое число: введите целое число: 1234 1224 нет. да. я попыталась сделать но вышло вот так: program qq; var a, b, c: integer; begin writeln ('введите целое число: '); read(a); while a< > 0 do begin; b: =a mod 10; a: =a div 10; if c=b then begin writeln('да'); end else c: =b; end; writeln('нет'); readln; end.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Gulyaev_Egorkina
catmos
ЛАРИСА Насоновская231
maryariazantseva
Кашихина
info32
oksana-popova
Виталий_Ильназ574
stsnab
Бочкова_Елена203
Державина
sergeykirushev
gallows-warlike-0z
fursov-da
Владимирович