Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
Будет 904.3
Объяснение:
const pi=3.14;
var r,v:real;
begin
write('R = ');
readln(r);
v:=4/3*pi*r*r*r;
writeln('V = ',v:4:1);
end.
2 var 3 s: string; 4 begin 5 readln(s); 6 while pos('с',s)> 0 do delete(s,pos('с',s),1); 7writeln(s); 8 end.это точно
writeln('a[',i,']=',a[i]);
readln;
Популярные вопросы