=D$2+$B4...........................................
Ну сначала объявляем переменные,константы юсы и т д,потом если нужно пишем процедуры и функции в конце пишем блок основной программы,заканчивающийся end.
В русском варианте диалога найти и заменить это выглядит так:
Найти: берёза
Заменить на: стол
То есть, будет найдено слово берёза, и заменено на слово стол.
Правильный ответ №3 (слово «берёза» заменится на слово «стол»).
1 шаг) Расставляем степенной ряд.
11010(2)=?(10)
1 в (4-степени) 1 в (3) 0 в (2) 1 в (1) 0 в (0)
2 шаг) Сумируем произведение цыфры числа умноженый на основание настоящей системой счистления в степени которая приписана к цифре.
0x2(0)+1x2(1)+0x2(2)+1x2(3)+1x2(4)=2+8+16=26(10)
11010(2)=26(10)
Надеюсь понятно написал...
Var s:string;
r:real;
i,j,n:integer;
begin r:=0;
readln(s);
for i:=1 to length(s) do begin n:=0; for j:=1 to length(s) do begin
if s[i]=s[j] then inc(n);
end;
r:=r+1/n;
end;
writeln('количество различных букв = ', r:1:0);
end.
2.