Алфавиттің қуаттылығы дегеніміз не?
Ответы
1. 24 бита = 3 байтам . т.к если мы переведем 3 байта в биты, то получим 3*8 = 24 бита. 250 байт больше чем 0,25 кбайт. т.к 250: 1000=0,4кбайт
В Паскале есть стандартная функция Pos, которая возвращает начальную позицию вхождения подстроки в строку или 0, если такое вхождение не обнаружено. С её данная задача решается очень просто.
var
s:string;
ip,iv:integer;
begin
Write('Введите строку: '); Readln(s);
ip:=Pos('П',s); iv:=Pos('В',s);
if ip*iv=0 then Writeln('П или В или обе не найдены в тексте')
else
if ip<iv then Writeln('П встретилось раньше В')
else Writeln('В встретилось раньше П')
end.
Тестовое решение:
Введите строку: НА ЛУГУ ПАСЕТСЯ КОРОВА
П встретилось раньше В
var
s:string;
ip,iv:integer;
begin
Write('Введите строку: '); Readln(s);
ip:=Pos('П',s); iv:=Pos('В',s);
if ip*iv=0 then Writeln('П или В или обе не найдены в тексте')
else
if ip<iv then Writeln('П встретилось раньше В')
else Writeln('В встретилось раньше П')
end.
Тестовое решение:
Введите строку: НА ЛУГУ ПАСЕТСЯ КОРОВА
П встретилось раньше В
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
