Укажите правильную последовательность построение прямоугольного параллелепипеда со стенками 30 см и 40 см боковыми стенками 50см а Марату создать параллелепипед б) установите правильную последовательность действий для создание пареллелипеда
Как-то так var a,b,c,h,p,s:real; var ch:char; var f:boolean; begin repeat write('Êàê ñ÷èòàåì ïëîùàäü? 1-Ïî Ãåðîíó, 2-÷åðåç ïîëîâèíó ïðîèçâåäåíèÿ îñíîâàíèÿ íà âûñîòó: '); readln(ch); if ch='1' then begin write('a='); read(a); write('b='); read(b); write('c='); read(c); p:=(a+b+c)/2; s:=sqrt(p*(p-a)*(p-b)*(p-c)); writeln('Ïëîùàäü ðàâíà ',s); f:=true; end else if ch='2' then begin write('a='); read(a); write('h='); read(h); writeln('Ïëîùàäü ðàâíà ',0.5*h*a); f:=true; end else begin cls; writeln('Îòâåò ôèãîâûé! Åùå ðàçîê: 1-Ïî Ãåðîíó, 2-÷åðåç ïîëîâèíó ïðîèçâåäåíèÿ îñíîâàíèÿ íà âûñîòó: '); end; until f; end.
Как-то так var a,b,c,h,p,s:real; var ch:char; var f:boolean; begin repeat write('Êàê ñ÷èòàåì ïëîùàäü? 1-Ïî Ãåðîíó, 2-÷åðåç ïîëîâèíó ïðîèçâåäåíèÿ îñíîâàíèÿ íà âûñîòó: '); readln(ch); if ch='1' then begin write('a='); read(a); write('b='); read(b); write('c='); read(c); p:=(a+b+c)/2; s:=sqrt(p*(p-a)*(p-b)*(p-c)); writeln('Ïëîùàäü ðàâíà ',s); f:=true; end else if ch='2' then begin write('a='); read(a); write('h='); read(h); writeln('Ïëîùàäü ðàâíà ',0.5*h*a); f:=true; end else begin cls; writeln('Îòâåò ôèãîâûé! Åùå ðàçîê: 1-Ïî Ãåðîíó, 2-÷åðåç ïîëîâèíó ïðîèçâåäåíèÿ îñíîâàíèÿ íà âûñîòó: '); end; until f; end.
1)Выберите инструмент «фигура», выберите форму «Прямоугольник»
2)Наберите «5Осм» на клавиатуре и нажмите «Enter»
3)Введите «30см; 40см» на клавиатуре и нажмите «Еnter»
4)Выберите инструмент «Рush / Drag»
5)Нажмите на начальную точку (первый угол прямоугольника)
6)растянуть прямоугольник в нужном направлении
7)высокая привлекательность
8)Нажмите на базу