program raf105;
var abc,ab,bc:integer;
begin
write('Введите трёхзначное число: ');
readln(abc);
ab:= abc mod 100;
bc:= abc div 10;
if ab = bc
then writeln('Число состоит из одинаковых цифр')
else writeln('Число не состоит из одинаковых цифр');
end.
ОбъяснениеДля выполнения задачи достаточно найти первые 2 цифры и последние 2 цифры если они равны, то число состоит из одинаковых цифр
abc mod 100 Убирает все сотни из числа.
Например было число 123, стало 23.
482 стало 82
abc div 10 Считает сколько в числе целых десяток, но не считает остаток.
Например было число 123, стало 12
482 стало 48
Сравнивание 2 первых и 2 последних цифр
253 25 и 53 не равны, значит число не состоит из одинаковых цифр
121 12 и 21 не равны, значит число не состоит из одинаковых цифр
111 11 и 11 равны, значит число состоит из одинаковых цифр
1. Игровой компьютер.
Объяснение:
Последние два варианта отлетают, так как мультимедийный компьютер предназначен для работы с мультимедийными файлами, данными. Офисный компьютер не подходит для таких игр.
Игры, которые занимают большое количество памяти, зачастую требовательны к железу. Это вторая причина отлёта двух последних вариантов.
Домашний компьютер может быть как мультимедийный, так и игровой. Так что, я думаю, что он тоже не подойдёт. Часто домашний компьютер используется просто для работы с браузером, каким-то там Word, Excel, Powerpoint - то есть для учёбы, работы и т.п., а не для игр.
Игровой компьютер - 100% подходит под требования.
