Вот это скопируйте и вставьте.
program chdast;
var a : integer;
begin
write('Введите двузначное число');
read(A);
if (a mod 10)=(a div 10) then writeln('цифры равны по значению');
if (a mod 10)>(a div 10) then writeln('вторая цифра больше первой');
if (a div 10)>(a mod 10) then writeln('первая цифра больше второй' );
end.
Верхний: ctrl shift +
нижний: ctrl +
Вход: CD-DVD, дискеты, сканер, ввод с клавиатуры, интернет, флешка, запись с микрофона
Вывод: (монитор), печать, флешка,
512 Кбит = 512 000 бит = 512 000 / 8 = 64 000 байт =
64 000 / 1024 = 62.5 Кбайт.
За 5 с можно передать 62.5×5 = 312.5 Кбайт
Комментарий. Некоторые учебники неверно трактуют килобиты и считают, что 1 кбит - 1024 бит. На самом деле бит - системная единица в Си и для неё действуют обычные кратности 10³. А килобайт - единица внесистемная, с кратностью 2¹⁰