Исправить) в 5 строке пишет, что ожидалось константное выражение, не знаю как исправить uses crt; var v1,v2,v,r1,r2,r,h : real; const pi=3.14 ; write=('r1='); readln=(r1); write=('r2'); readln=(r2); write=('h='); readln=(h); v1= ((pi/3) * h*((r1*r1)+r1*r2+(r2* ; v2= (h/3 * pi * r*r); v= v1-v2 ; writeln =(v); begin ; end.
данила0625
3
22.08.2019 14:00
1
Другие вопросы по теме Информатика
лиза286489
28.06.2019 20:40
cherry1527
28.06.2019 20:40
arinaaverichev
25.08.2019 18:50
Rikrbrujrh
25.08.2019 18:50
dimonatomp0ce79
10.11.2019 16:12
элизабет35
22.08.2019 06:00
nbis2000
22.08.2019 06:00
anastasiysu77
22.08.2019 06:00
rowa9712men
22.08.2019 06:00
Популярные вопросы
- Впришкольном саду 4 т 590 кг яблок и 3 т 660 кг груш.яблоки упаковали...
1 - Бросили шесть монет. какова вероятность, что число выпавших гербов,будет...
2 - Напишите кратко о перепончатокрылых...
3 - Придумайте диалог из 6 реплик p.s только реальный...
3 - Запиши числа в виде суммы разрядных слагаемых : 72,97,171,303,666...
2 - Замените словосочетание движение души синонимичным с подчинительной связью...
2 - Прочитайте и отредактируйте пред ложения: а) вдали показалась берёзовая...
3 - Один автобус вещает 40 пасажиров. сколько нужно автобусов чтобы поехоло...
2 - Связь в соединении галогена со щелочным металлом: 1) ковалентная неполярная...
3 - Подготовьте сообщение на тему происхождение предлогов в языке...
1
const pi=3.14;
begin
writeln('r1 = ');
readln(r1);
writeln('r2 = ');
readln(r2);
writeln('h=');
readln(h);
v1:= ((pi/3) * h*((r1*r1)+r1*r2+(r2*r2))) ;
v2:= (h/3 * pi * r*r);
v:= v1-v2 ;
writeln (v);
end.