Хлеба ни куска, так и в горле тоска.<span>Чеснок да редька - так и на животе крепко.
</span>Завтрак съешь сам, обед раздели с другом, ужин - отдай врагу.Когда я ем я глух и нем.недосол-на столе,пересол-на спине...<span><span>Без блина не маслена; без пирога не именинник.
Без ложки и добрый едок станет.
Без соли и хлеб не естся.
Без соли невкусно, а без хлеба несытно. Без соли стол кривой.
</span></span>
Алфавит,содержащий два символа, называется двоичным алфавитом.
Поэтому для кодирования 26 символов достаточно пятиразрядного кода.
Поясни получше, просто не понятно , что именно требуется
VAR
A,B,C,D:integer;
Begin
WriteLn('введите числа A,B,C,D);
ReadLn(A,B,C,D);
if (A=B) and (B=C) and (C=D) then
WriteLn('все числа равны');
else
if (A=B) or (B=C) or (C=D) or (A=D) then
Begin
Write ('только');
WritweLn('два три числа равны');
end
else
WriteLn('все числа разные');
end.