Вот я сделал то же самое но на JavaScript
Переменная S равна 19
2100 + 68 = 2168 то есть в)
между буквами +
А)Список студентов вуза, список контактов в телефоне.
б)Население и площадь стран, таблица рекордов.
в)Исторические события, расписание автобусов, поездов, <span>и т. д.</span>
Program prognoz;
var Z, K, p, q: real;
M: Integer;
BEGIN
Write('Введите среднюю зарплату в январе Z = '); ReadLn(Z);
Write('Введите среднюю потреб.корзину в январе K = '); ReadLn(K);
Write('Введите предполагаемый ежемесячный рост зарплаты в % p = '); ReadLn(p);
Write('Введите предполагаемый ежемесячный рост потреб.корзины в % q = '); ReadLn(q);
M := 2;
Z := Z*(1+p/100);
K := K*(1+q/100);
while (Z >= K) AND (M < 13) do
begin
WriteLn('Прогноз разности зарплаты и потреб.корзины в ', M:2, '-й месяц:', (Z-K):10:2, ' руб.');
Inc(M);
Z := Z*(1+p/100);
К := K*(1+q/100);
end
<span>END.</span>