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

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


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

Ответ:
saskey
saskey
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
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?