1)Составьте программку, которая выводит на экран таблицу перевода а, а+1,а+2,...б минут

1)Составьте программу, которая выводит на экран таблицу перевода а, а+1,а+2,...б минут в секунды. Границы а и б вводятся с клавиатуры. Введите границы :12 18 12 мин = 720 сек........... 18 мин =1080 сек 2)Составить программку для решения последующей задачи: Начав тренировки, спортсмен в 1-ый денек пробежал 10 км. Каждый день он увеличивал дневную норму на 10% нормы предшествующего денька. Какой суммарный путь пробежит спортсмен за N дней? ( все в Паскале)

Задать свой вопрос
1 ответ

1)

program translate;
var m1, m2, s: integer;
begin
writeln(Введите границы (через пробел): );
readln(m1, m2);
for i: integer:= m1 to m2 do writeln( i, мин = , i * 60, сек)
end.

2)
program skier;
var d_day, d_sum: real;
n, k: integer;
begin
write(Количество дней - );
readln(n);
d_day:=10;
d_sum:=10;
k:=1;
while k lt; n do
begin
d_day:= d_day + 0.1  *d_day;
d_sum:= d_sum  +d_day;
k:=k  +1
end;
writeln(Суммарный путь за , n, дней - , d_sum:8:2, км)
end.

 

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт