Правая кнопка мыши->"Свойства"
1) 2^15<65000<2^16 ----> 16 бит для одного цвета
2) 16 : 8 =2 уменьшение в два раза (ответ 4)
Var a:string;i,s:integer;
begin
read (a);
for i:=1 to length(s) do
begin
s:=s+i;
write (s);
end;
end.
Var
a: array[1..10] of integer;
i: integer;
begin
for i:=1 to 10 do
a[i] := i-4;
a[2] := a[9] + a[2];
a[9] := a[2] - a[9];
a[2] := a[2] - a[9];
for i:=1 to 10 do
write(a[i], ' ');
end.
//Решение для годовой процентной ставки
#include <iostream>
#include <math.h>
#include <iomanip>
#define MONT 12
#define PER 100
using namespace std;
int main()
{
unsigned int credit, period;
double montpay;
cout << "Input loan amount: ";
cin >> credit;
cout << "Input crediting period (years): ";
cin >> period;
cout << setw(15) << "INTEREST RATE | " << setw(15) << "MONTHLY WAGE | " << setw(13) << "TOTAL PAYMENT" << endl;
for(double p = 5.; p <= 8.; p += 1./8) {
montpay = credit * p / MONT / PER * pow(1 + p / MONT / PER, period * MONT) / (pow(1 + p / MONT / PER, period * MONT) - 1);
cout << setw(9) << fixed << setprecision(3) << p << "%" << setw(15) << fixed << setprecision(2) << montpay << setw(16) << fixed << setprecision(2) << montpay * period * MONT << endl;
}
return 0;
}
//Редактор не сохраняет форматирование => прикрепил .cpp файл