Регистрация
Войти
Стать экспертом Правила
Информатика

Надо написать программу на Pascal.Вася готовится к муниципальному этапу олимпиады по информатике, он хочет показать на нём хороший результат. Чтобы добиться этого, он разработал собственную систему тренировок — он каждый день решает задачи. Причём, он решает разное количество задач в будние и в выходные дни.В будний день Вася решает Xзадач, в выходной день — Yзадач.Выходным Вася считает каждый K-й день, то есть дни с номерами K, 2K, 3K, …являются выходными.Вася будет готовиться к олимпиаде ровно Nдней и он хочет заранее знать, Как узнать сколько всего задач он решит. Считается, что Вася решает задачи, начиная с дня с номером 1.Требуется написать программу, которая по данным N, K, X, Yвычисляет количество решённых задач.Входные данныеВ первой строке вводится натуральное число N(1⩽N⩽1000) - количество дней, которое Вася будет решать задачи для подготовки к олимпиаде.Во второй строке вводится натуральное число K(1⩽K⩽1000) - номер первого выходного дня.В третьей строке вводится натуральное число X(1⩽X⩽1000) - количество задач, которое Вася решает в будний день.В четвёртой строке вводится натуральное число Y(1⩽Y⩽1000) - количество задач, которое Вася решает в выходной день.Примервходные данные321015выходные данные35

ОТВЕТЫ

program abc;

var n,k,x,y:integer;

begin

   readln(n);

   readln(k);

   readln(x);

   readln(y);

 writeln((k)*x+(n-k)*y);  

end.

288
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам