9 задание точно г
8 раскодированное слово (знак) скорее всего ответ б
1ая программа считает количество голосов для этого заведен счетчик m и в конце m=7
Const
pi=3.14;
var
V1,V2,R,h:real;
begin
Write('Введите радиус и высоту: '); Read(R,h);
V1:=pi*sqr(R)*h; V2:=V1/3;
Writeln('Объем цилиндра ',V1:0:5,', объем конуса ',V2:0:5)
end.