8класс
Страницы 149-156 §3.4 номер 6, ГДЗ по информатике за 8 класс к учебнику Босовой
Многообразие способов записи ветвлений. Страницы 149-156 §3.4 номер 6
Смотрите ещё задания из учебника:
Страницы 140-148 §3.3 номер 16
Страницы 149-156 §3.4 номер 1
Страницы 149-156 §3.4 номер 2
Страницы 149-156 §3.4 номер 3
Страницы 149-156 §3.4 номер 4
Страницы 149-156 §3.4 номер 8
Страницы 149-156 §3.4 номер 9
Страницы 149-156 §3.4 номер 10
Страницы 149-156 §3.4 номер 11
Страницы 149-156 §3.4 номер 12
... смотреть все номера
Программа, определяет: есть ли среди цифр данного числа одинаковые; является ли данное число перевёртышем
а)
program z6a;
var
x, a, b, c: integer;
begin
write('введи х - трехзначное число>');
readln(x);
a := x mod 10;
b := x div 100;
c := x mod 100 div 10;
if (a = b) or (a = c) or (b = c) then write('Да') else write('Нет');
end.
б)
program z6b;
var
x, a, b: integer;
begin
write('введи х - трехзначное число>');
readln(x);
a := x mod 10;
b := x div 100;
if (a = b) then write('Перевертыш') else write('Нет');
end.