program p;
var s,a,b,c:string;
begin
s:='геометрические фигуры';
writeln('введите названия трёх геометрических фигур');
read(a,b,c);
writeln(s,': ',a,', ',b,' и ',c);
end.
Для нахождения минимума из четырёх чисел, можно использовать метод для нахождения минимума из двух чисел. Таким образом код будет намного яснее и компактнее. И вместо присваивания значения переменным m4 и m2 лучше сразу возвращать результат.
static int min2(int a, int b)
<span>{
</span><span> if(a < b)
</span><span> {
</span><span> return a;
</span><span> }
</span><span> else
</span><span> return b;
</span><span>}
static int min4(int a, int b, int c, int d)
<span>{
</span><span> return min2(min2(a, b), min2(c, d));
</span><span>}</span></span>
Значки рахуємо по маленьких стрілках внизу, але викидаємо значок папки My Pictures, це не програма. Одже їх D) 7.
Я, конечно, не художник, но надеюсь это похоже на ёлки.
uses GraphABC;
begin
For var i := 0 to 4 do
begin
SetBrushColor(clGreen);
FillPie(80 + 120 * i, 100, 25, -50, -130);
FillPie(80 + 120 * i, 115, 40, -50, -130);
FillPie(80 + 120 * i, 135, 60, -50, -130);
FillPie(80 + 120 * i, 160, 75, -50, -130);
SetBrushColor(clBrown);
FillRectangle(74 + 120 * i, 234, 86 + 120 * i, 245)
end;
end.
#include <iostream>
#include <cmath>
int main(){
int data;
int inputVar;
std::sin>>data;
std::cout<< "Объем: " << pow(data, 3);
inputVar = pow(data, 2);
std::cout<< "Площадь: " << inputVar * 6
}