40 в 8=32 в десятичной е6 в 16= 230 в 10 230-32=198 натуральных чисел
Спасибо
Ответ дал: Гость
паскаль:
uses crt;
var a,b: string; \ а-слово ,b-символ
i: integer; \ переменная для счета
begin
writeln ('слово и символ');
readln (a,b); \\ввод данных
for i: =1to length(a) do if copy (a,i,1)=b then writeln (i); \\копирование по порядку символов слова а и сравнение каждого с символом b. вывод ответа. или ответов
readkey; \\если символы в слове повторяются
end.
Ответ дал: Гость
ну, в первом тексте информационный объем одного символа составляет
Популярные вопросы