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

Ответы 1

  • 1)

    program translate;var m1, m2, s: integer;beginwriteln(\'Введите границы (через пробел): \');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;beginwrite(\'Количество дней - \');readln(n);d_day:=10;d_sum:=10;k:=1;while k < n do begind_day:= d_day + 0.1  *d_day;d_sum:= d_sum  +d_day;k:=k  +1end;writeln(\'Суммарный путь за \', n, \' дней - \', d_sum:8:2, \' км\')end.

     

  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years