Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
а) >
б) =
в) <
Объяснение:
1 байт = 8 бит
1 Кбайт = 1024 байта
1 Мбайт = 1024 кб
1 Гб = 1024 мб
1 Тб = 1024 Гб
1 Пб = 1024 Тб
составим таблицу:
| молоко | лимонад | квас | вода
бутылка | - | + | - | -
стакан | - | - | - | +
кувшин | + | - | - | -
банка | - | - | + | -
program xxx;
var a,s : string;
i: integer;
begin
writeln ('введите слово и символ-');
readln (s,a);
for i: =1 to length(a) do
if copy (s,i,1)=a then writeln (i);
readln
end.
Популярные вопросы