//Дам блок-схему и код на Паскале
//Pascal ABC.NET v3.0 сборка 1111
var
r,v,s:real;
begin
readln(r);
v:=4/3*pi*power(r,3);
s:=3/4*pi*sqr(r);
writeln('V=',v,' S=',s);
end.
Слова "Кабачок" и "Морковь" сами по себе имеют одинаковое количество букв, когда мы их уберем из текста, то пропадут 14 букв + 2 пробела и 2 запятые, затем посчитаем сколько в тексте символов, а их 67.
Каждый символ весит по 2 байта, значит информационный объём всего текста равен 67 * 2 = 134 Байта
134 - 18 * 2 = 98 Байт
Ответ: 98 Байт информационный объём исходного текста.
Ответ:
var
n1, n2, dif: real;
begin
readln(n1, n2);
dif:= n1-n2;
if n1-n2 > 0 then
writeln('Разность положительная. Разность = ', dif)
else if n1-n2 < 0 then
writeln('Разность отрицательная. Разность = ', dif)
else
writeln('Разность равна нулю. Разность = ', dif);
end.
Объяснение:
Линейным называется алгоритм, в котором все этапы решения задачи выполняются строго последовательно. Т.е. линейный алгоритм выполняется в естественном порядке его написания и не содержит разветвлений и повторений. Например, линейным является следующий алгоритм посадки дерева:<span>1) выкопать в земле ямку;
2) опустить в ямку саженец;
3) засыпать ямку с саженцем землей;
</span><span>4) полить саженец водой.
</span>