Var a, b, c:integer;
Begin
Writeln('vvedite chisla');
Readln(a,b,c);
If (a>b) and (a>c) then writeln(a);
If (b>a) and (b>c) then writeln(b);
If (c>a) and (c>b) then writeln(c);
End.
Есть игры развивающие ум и мозг которых употребляют в хороших целях они могут принести максимальную пользу что же касается вреда от компьютерных игр то он, связан с неумеренным использованием. Для определённого возраста свой временный уровень.
Надо посчитать количество символов, включая пробелы. Здесь 34 символа. 34*2=68 байт - информационный объём предложения.