Объяснение:
В 1945 году работала первая в СССР аналоговая машина. До войны же были начаты исследования и разработки быстродействующих триггеров — основных элементов цифровых ЭВМ.
29 июня 1948 года Председатель Совета Министров СССР И. В. Сталин подписал постановление, в соответствии с которым создавался Институт точной механики и вычислительной техники.
В 1948 году под началом доктора физико-математических наук С. А. Лебедева в Киеве начинаются работы по созданию МЭСМ (малой электронной счетной машины). В октябре 1951 года она вступила в эксплуатацию.
В конце 1948 года сотрудники Энергетического института им. Крижижановского И. С. Брук и Б. И. Рамеев получают авторское свидетельствона ЭВМ с общей шиной, а в 1950—1951 гг. создают её. В этой машине впервые в мире вместо электронных ламп используются полупроводниковые (купроксные) диоды. С 1948 г. Брук вёл работы по электронным ЦВМ и управлению с применением средств вычислительной техники.
В начале 1949 года в Москве на базе завода САМ были созданы СКБ-245 и НИИ Счетмаш. Создаются заводы «Счётмаш» в Курске, Пензе, Кишинёве.
Подробнее - на -
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 равны, значит число состоит из одинаковых цифр
