Top.Mail.Ru
Ответы
Аватар пользователя
16лет
Изменено
Аватар пользователя
Аватар пользователя
Аватар пользователя
Программирование
+3

Pascal

помогите, пожалуста=)
Надо написать программы на турбо паскале:

1) написать программу вычисления а(в степени n), не используя функцию sqr(a), n-снатуральное число. Значения а и n вводить с клавиатуры.
2)Вводя по очереди с клавиатуры ежемесячный заработок сотрудника за год, определить его средний зароботок.
3)Вводя по очереди с клавиатуры результаты заплыва 10 пловцов, определить фамилию и результат призера.

циклические задачи

По дате
По рейтингу
Аватар пользователя
Просветленный
16лет

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;

Описать переменные, надеюсь, сможешь сама.. . Но если что, пиши, помогу...

Аватар пользователя
Профи
16лет

395359808
стучи, помогу!

Аватар пользователя
Оракул
16лет

Включи мозг.
Все элементарно.
Тебя учат чтобы ты училась а не чтобы за тебя кто-то писал.

Аватар пользователя
Мыслитель
16лет

Оплата?