В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
mazasa128
mazasa128
24.05.2021 11:24 •  Информатика

Написать программу на Паскале


Написать программу на Паскале

Ответ:
11111Ангелина11111
11111Ангелина11111
30.12.2020 14:35

В первый час работы рабочий изготавливает а деталей, за каждый последующий час - нa d деталей больше, чем за предыдущий. Разработайте программу, которая подсчитывает, сколько деталей изготовил рабочий за К часов работы.

Нам нужно ввести целочисленные переменные a, d, K и вывести ответ.

Заводим две переменные: s - суммарное количество деталей, изготовленных за первые часы работы, и next - количество деталей, которых рабочий изготовит в следующий час.

Затем в цикле обрабатываем каждый час: увеличиваем s на next и обновляем значение next.

В конце выводим значение s.

Код (Pascal):

var

 a, d, K, i, s, next: integer;

begin

 read(a, d, K);

 s := 0;

 next := a;

 for i := 1 to K do

 begin

   s := s + next;

   next := next + d;

 end;

 write(s)

end.

Пример ввода:

1 1 8

Пример вывода:

36

(Пояснение: 1 + 2 + 3 + 4 + 5 + 6 + 7 + 8 = 36)

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?