Составить программу на языке Паскаль. Вводится с клавиатуры сумма покупки. Если покупка больше или равна 3000р , то делается скидка 15%, если стоимость покупки от 2000р и менее 3000р , то скидка 10%, если покупка от 1500р, но менее 2000р, то скидка 5%. Если сумма меньше, то скидок нет.
using namespace std;
int main()
{
double S = 0;
int N = 0, K = 0, A;
cout <<"K = ",cin >> K;
for(int i = 0; i < K; i++)
{
cout <<"Nabor "<<i<<": ";
S = 0;
N = 0;
cin >> A;
while(A != 0)
{
S+=A;
N++;
cin >> A;
}
if (N!=0) cout <<"Sr = "<<S/N<<"\n";
else cout <<"Na noll delit' nel'zja!\n";
}
return 0;
}