Var p,a:integer;
begin
writeln('Введи сторону');
readln(a);
p:=4*a;
writeln(p);
end.
----------
var s,a:integer;
begin
writeln('Введи сторону');
readln(a);
s:=a*2;
writeln(s);
end.
For( i = 0; i < 5; i++ ) { ind[ i ] = i; a[ i ] = size[ i ] * speed[ i ]; }
// Предположим, что тут надо умножать, хотя из условия это неясно.
for( i = 0; i < 5-1; i++ )
for( j = i+1; j < 5; j++ )
if (a[ i ] < a[ j ]) { swap[ a[ i ], a[ j ]); swap( ind[ i ], ind[ j ] ); }
for( i = 0; i < 4; i++ ) printf( "%d => %d\n", ind[ i ], a[ i ] );
1) С моделью: управлять через пульт управления. С оригиналом: управлять, сидя в кабине пилота. С обоими: управлять полётом.
2) С моделью: обсуждать. С оригиналом: одеть. С обоими: узнать цвет куртки.
3) С моделью: изменять что-то в плане, чертить. С оригиналом: жить в квартире. С обоими: вычислить общую площадь квартиры.
4) С моделью: любоваться им, изменить форму. С оригиналом: кипятить в нём воду. С обоими: узнать объем вмещаемой жидкости.
5) С моделью: думать о ней, изменить представление. С оригиналом: быть уже в пути и ждать её завершения. С обоими: получать удовольствие.
Ощутить размер оригинала, потрогать, воспринять как что-то настоящее.