1)Переводим все в дюймах дюйм=2.54 22,86/2,54=9
2)теперь все перемножаем 9*9*600*1200*4/8=29160000
Ответ:29160000 Байт
Слева Справа
Вода Кислород
Минеральные вещества Зрелый лук
Углекислый газ
Солнце
Var T:string;
k:integer;
s,c:char;
begin
Writeln('Введите строку');
Readln(T);
Writeln('Введите буквы s и c');
Readln(c);
While not(Pos(s,T)=0) do
begin
k:=Pos(s,T);
T[k]:=c;
end;
Writeln('Изменённая строка - ',T);
end.