Объяснение:
#include <iostream>
using namespace std;
int main()
{
int a[5];
int k;
int i;
setlocale(LC_ALL, "Russian");
cout << "введите через пробел пять элементов массива a:";
cin>>a[1]>>a[2]>> a[3]>>a[4]>>a[5];
cout <<"Входные данные:";
cout << a[1]<<" "<< a[2]<<" "<< a[3]<<" "<<a[4]<<" "<<a[5]<<endl;
int min=a[1];
for (int i=2; i<=5; i++)
{
if (min>a[i])
{
min=a[i];
k=i;
}
}
cout<<"Минимальный элемент массива:";
cout << min<<endl;
int x=a[k];
for ( i=k; i>1; i--)
{ a[i]=a[i-1];
}
if ( i<=0)
a[1]=min;
else
a[1]=x;
cout <<"Выходные данные:";
cout << a[1]<<" "<< a[2]<<" "<< a[3]<<" "<<a[4]<<" "<<a[5]<<endl;
return 0;
}
Программа:
Pascal:
var
chemodan, klad, dop: real;
begin
write('Вес чемодана', #10, '<<< '); readln(chemodan);
write('Вес ручной клади', #10, '<<< '); readln(klad);
write('Вес доп. предметов ручной клади', #10, '<<< '); readln(dop);
writeln('Вес багажа: ', chemodan + klad + dop);
end.
Python:
chemodan = float(input('Вес чемодана\n>>> '))
klad = float(input('Вес ручной клади\n>>> '))
dop = float(input('Вес доп. предметов ручной клади\n>>> '))
print('Вес багажа:', chemodan + klad + dop)
Здесь f вычисляется в одну строчку:
var f: real;
var x: real;
x := 8; { 16, 24 }
f := 4*x*x*x + 2*x - 1;
Далее идет исправленное решение задачи для Бочонка228 (в его задаче просто не могу изменить решение):
type pupil = record
name: string[20];
sex: (female, male);
age: integer;
height: 140..200
end;
begin
var i, a: integer;
var group: array [1..10] of pupil;
for i:= 1 to 10 do begin
writeln(i);
writeln('Name:'); readln(group[i].name);
writeln('Sex (1-male, 2-female):'); readln(a);
if a = 1 then begin
group[i].sex := pupil.male;
end
else begin
group[i].sex := pupil.female;
end;
group[i].age := 0;
while (group[i].age < 6) or (group[i].age > 100) do begin
writeln('Age (6-100):'); readln(group[i].age);
end;
group[i].height := 0;
while (group[i].height < 140) or (group[i].height > 200) do begin
writeln('Height (140-200):'); readln(group[i].height);
end;
end;
for i := 1 to 10 do begin
if (group[i].age <= 30) and (group[i].sex = pupil.female) then begin
writeln(group[i].name);
writeln(group[i].age);
writeln(group[i].height);
end
end
end.