11010010 = 128+64+0+16+0+0+2+0 = 210
11001100 = 128+64+0+0+8+4+0+0 = 204
11001111 = 128+64+0+0+8+4+2+1 = 207
11010011 = 128+64+0+16+0+0+2+1 = 211
а = 192
б = 193
<span>...</span>
Var i, pr: Integer; n: String;
Begin
readln(n);
pr := 0;
for i := 1 to length(n) do
if n[i] = ',' then pr := 1;
if pr = 1 then write('Такой символ есть') else write('Такого символа нету');
End.
Ответ:
Объяснение:
Мелкий чиновник, часто разъезжающий по служебным делам. От его лица идет описание героев повести. Любознательный молодой человек, с уважением относящийся к простым людям. Умеет найти подход к людям, любит слушать различные истории. Внимательный и наблюдательный человек, умеет сопереживать и сочувствовать чужому горю. Узнав о том, что у Дуни все сложилось хорошо, и она была на могиле отца, он прощает ее.
Краткое сочинение
Побольше обьяснений, а пока напишу так:
var A:integer;
begin
Writeln('Введите температуру, в зимнее время');
Readln(A);
If A>0 then
Writeln('Метеорологическая весна наступала')
else
Writeln('Метеорологическая весна не наступала');
end.