


Pascal
помогите, пожалуста=)
Надо написать программы на турбо паскале:
1) написать программу вычисления а(в степени n), не используя функцию sqr(a), n-снатуральное число. Значения а и n вводить с клавиатуры.
2)Вводя по очереди с клавиатуры ежемесячный заработок сотрудника за год, определить его средний зароботок.
3)Вводя по очереди с клавиатуры результаты заплыва 10 пловцов, определить фамилию и результат призера.
циклические задачи
1.
realdn(a,n);
writeln('a в степени n: ', round(exp(n*ln(a))));
readkey;
2.
s:=0;
for i:=1 to 12 do
begin
readln(zar);
s:=s+zar;
end;
sr:=s/12;
writeln(sr:9:4);
readkey;
3.
min:=32000;
for i:=1 to 10 do
begin
readln(fam);
readln(n);
for n < min then
begin
min:=n; {если очередное время меньше минимального, то переписываем минимальное время}
win:=fam;
end;
end;
writeln('Победил пловец ',win, ' со временем ',min);
readkey;
Описать переменные, надеюсь, сможешь сама.. . Но если что, пиши, помогу...
395359808
стучи, помогу!
Включи мозг.
Все элементарно.
Тебя учат чтобы ты училась а не чтобы за тебя кто-то писал.
Оплата?