Информатика, 9 класс ! максимум

Объяснение:

вроде так. но я особо не уверен, лучше загугли

Сначала разберёмся с начертаниями. всего возможно 8  вариантов: 1) обычный    текст 2) полужирное     текст3) курсивное     текст4) подчёркнутое    текст 5) полужирное + курсивное     текст6) полужирное + подчёркнутое    текст 7)  курсивное + подчёркнутое    текст 8) полужирное + курсивное + подчёркнутое     текст умножаем эти 8 вариантов на 2 размера и получаем результат: 16 ответ: всего существует 16 раз­личных вариантов форматирования слова «текст»

1) 

var v1,a,v2,v3,d:integer;

begin

readln(a,b);

a:=a/10;

v1:=a*a*a;

v2:=4/3*3,14*(d/2)(d/2)(d/2);

v3:=v1-v2;

Writeln("Объем выплеснутой воды ",v3);

readln();

end.

 

2) 

var

i,num,a,b,c,d,e,f, sum1,sum2:integer;

 

begin

readln(num);

a:=num div 100000;

num:=num mod 100000;

b:=num div 10000;

num:=num mod 10000;

c:=num div 1000;

num:= num mod 1000;

d:=num div 100;

num:= mod 100;

e:=num div 10;

f:=num mod 10;

 sum1:=a+b+c;

sum2:=d+e+f;

If (sum1=sum2) then

Writeln("Да, является.");

else writeln("Нет, не является.");

readln();

end.