Ну, раз заменять предложение, то...)
var a: string;
begin
readln(a);
if (a = 'Не то предложение') then a := '...';
writeln(a);
<span>end.</span>
500 байт = 0,5 кбайт=500 байт (т.к в одном кбайт 1000 байтов)
8 бит = 1 байт= 8 битов( т.к в одном байте 8 битов)
Пример реализации в VBA Excel.
Код программы можно увидеть, нажав Alt+F11
79. Изобразите на схеме элементы, образующие и наВ = {н, о, ч, к, а), с = {р, е, к, ај, D = {у, ч, е, н, и, к}. Запишите все эле
Андрей 2011 [102]
Ответ:
Объяснение:
1{н, о, ч, к, а, р, е}
2) {к, а}
3) {н, о, ч, к, а, р, е, у, и}
4) {к, а}
5) {н, ч, к, е}
6) {у, ч, е, н, и, к}
7) {н, о, ч, к, а, е}
8) {к, а, ч, н}