Циклы с постусловием.

1. Даны n натуральных чисел. Вывести те числа, значения которых являются степенями двойки (1, 2, 4, 8, 16, ...).
2. Даны n натуральных чисел. Вывести те числа, значения которых находятся в отрезке [a, b]
3. Даны n натуральных чисел. Вывести на экран те числа, значения которых являются квадратами какого-либо числа.
4. Дано натуральное число n. Вывести квадраты чисел от 1 до n.
5. Даны натуральные числа a, n. Найти a^n
6. Дано натуральное число n. Вычислить произведение (2n-1)(3n-1)(4n-1)...(10n-1).
7. Вычислить сумму 2+4+6+...+100.
8. Дано натуральное число n, действительное x. Вычислить произведение x+x/2+x/3+...+x/n.
9. Дано натуральное число n. Вычислить P=(1-1/2)(1-1/3)x...x(1-1/n), где n>2​.

Это задача на вычисление суммы после уплаты налога.
Если s0  - исходная сумма, а р - процент налога, то ищется s=s0-s0*p/100.
Окончательная формула: s=s0(1-p/100)

const
  p=13;  { налог в процентах }
var
  s0,s:real;
begin
  Write('Введите сумму '); Read(s0);
  s:=s0*(1-p/100);
  { а теперь округлим сумму до копеек, т.е. до 0.01 }
  s:=Int(100*(s+0.005))/100;
  Writeln('Сумма после вычета налога ',p,'% составит ',s:0:2)
end.

Тестовое решение:
Введите сумму 2000
Сумма после вычета налога 13% составит 1740.00

Замечание. При целочисленной зарплате и целочисленном проценте налога оператор s:=Int(100*(s+0.005))/100; не нужен, поскольку в дробной части всегда будет не больше двух знаков. Но, поскольку о сумме зарплаты ничего не говорится, а дано только конкретное значение, которое понято как тестовый пример, было предложено решение с округлением.

#include <iostream>
using namespace std;
int main()
{ setlocale(0,"");
int a;
cout<<"введите значение погоды"<<endl;
cout<<"1-тепло"<<endl;
cout<<"2-жарко"<<endl;
cout<<"3-холодно"<<endl;
cout<<"4-колотун"<<endl;
cin>>a;
switch (a)
{
case 1: cout<<"вы можете одеть джинсы и футболку"<<endl; break;
case 2: cout<<"вы можете одеть шорты и майку "<<endl; break;
case 3: cout<<"вы можете одеть штаны и толстовку "<<endl; break;
case 4: cout<<"вы можете одеть куртку и свитер с подштанниками и ватными штанми "<<endl;
 break;
}
return 0;
}