var
i, b: integer;
begin
b := 0;
for i := 1 to 100 do
if (i mod 2 <> 0) then b := b + i;
writeln(b);
end.
Ответ:
1000001110
Объяснение:
453(в восьмеричной) = 100101011(в двуичной)
100101011 + 11100011 = 1000001110
1)выделить текст
2)нажатием правой кнопкой нажать копировать
3)открыть нужный файл нажать правую кнопку и нажать вставить
Блок схема алгоритма вычисления площади тропеции