• Нужно на языке паскаль.
    Паскаль. ПРОШУ ПОМОГИТЕ.
    1) За 1 день рабочий изготовил 5 деталей. Напечатать, сколько деталей рабочий изготовит за 5, 6, 7, 8, 9, 10 дней. 2) В день корова даёт 6 литров молока. Сколько молока даст корова за 3, 4, 5, ..10 дней?

Ответы 2

  • Я так понимаю, что производительность не увеличивается, т. е., каждый день рабочий изготавливал по 5 деталей, а корова давала (для остряков: без шуточек!) по 6 литров молока. Да, количество дней вводится вручную с клавиатуры. Если надо, могу переделать под уже готовые значения.1) Program P1;uses crt;var d, i, n: integer;beginclrscr;write ('Введите количество дней: ');readln (d);n:=5;for i:=2 to d do beginn:=n+5;end;write ('За ', d, ' дней рабочий изготовит ', n, 'деталей.');readkey;end.2) Program P2;uses crt;var d, i, n: integer;beginclrscr;write ('Введите количество дней: ');readln (d);n:=6;for i:=2 to d do beginn:=n+6;end;write ('За ', d, ' дней корова даст ', n, 'литров молока.');readkey;end.
  • используй циклы for.
    • Автор:

      miranda54
    • 4 года назад
    • 0
  • Добавить свой ответ

Войти через Google

или

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

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

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