1.Вычеслить обьем куба,если длина ребра задана 2.Вычеслить площадь поверхности кирпича,если длины ребер заданы 3.Вычеслить длину окружности,если радиус задан.
1) var V,a: integer; begin write('Введите длину ребра: '); readln(a); V:=a*a*a; writeln('Объём куба: ',V); end. 2) var a,b,c,S: integer; begin writeln('Введите длины ребер:'); readln(a,b,c); S:=2*a*b 2*a*c 2*b*c; writeln('Площадь поверхности кирпича: ',S); end. 3) var r,l: real; begin write('Введите радиус окружности: '); readln(r); l:=2*Pi*r; writeln('Длина окружности: ',l); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
