Program deposit; var p,s: real; n:integer; begin p:=0;//величина прибавки s:=1000;//первоначальная сумма n:=0;//число месяцев while p<=30 do //пока прибавка меньше 30 руб. begin p:=s*0.02; //величина месячной прибавки сумма плюс прибавка за текущий месяц n:=n+1;//число месяцев end; writeln('Ежемесячное увеличение вклада превысит 30 руб через ',n, ' месяцев'); n:=0; //обнуление счетчика месяцев s:=1000;//восстановление значения первоначального взноса while s<=1200 do begin p:=s*0.02;//Величина месячной прибавки сумма плюс прибавка за текущий месяц n:=n+1;//число месяцев end; writeln('Величина вклада превысит 1200 руб через ',n,' месяцев'); end.
Айнымалы —әріп түрінде немесе әріптер тобы түрінде программаға енгізілетін және уақыт, ұзындық, баға, түс және т.б. әр түрлі мәндерді қабылдайтын программадагы сандық шама;
белгілі бір мәліметтер типін сақтай алатын және программаны атқару барысында мәнін өзгертуге болатын атауы белгілі объект.
Айнымалылар әдетте кіші латын немесе грек әріптерімен (индекстерімен болуы мүмкінами) белгіленеді: {\displaystyle x,~y,~\varepsilon }.
Өзгеру облысы айнымалылардың сәйкес әріптермен, бірақ ирек жақшамен алынып белгіленеді
var p,s: real;
n:integer;
begin
p:=0;//величина прибавки
s:=1000;//первоначальная сумма
n:=0;//число месяцев
while p<=30 do //пока прибавка меньше 30 руб.
begin
p:=s*0.02; //величина месячной прибавки
сумма плюс прибавка за текущий месяц
n:=n+1;//число месяцев
end;
writeln('Ежемесячное увеличение вклада превысит 30 руб через ',n, ' месяцев');
n:=0; //обнуление счетчика месяцев
s:=1000;//восстановление значения первоначального взноса
while s<=1200 do
begin
p:=s*0.02;//Величина месячной прибавки
сумма плюс прибавка за текущий месяц
n:=n+1;//число месяцев
end;
writeln('Величина вклада превысит 1200 руб через ',n,' месяцев');
end.
Айнымалы —әріп түрінде немесе әріптер тобы түрінде программаға енгізілетін және уақыт, ұзындық, баға, түс және т.б. әр түрлі мәндерді қабылдайтын программадагы сандық шама;
белгілі бір мәліметтер типін сақтай алатын және программаны атқару барысында мәнін өзгертуге болатын атауы белгілі объект.
Айнымалылар әдетте кіші латын немесе грек әріптерімен (индекстерімен болуы мүмкінами) белгіленеді: {\displaystyle x,~y,~\varepsilon }.
Өзгеру облысы айнымалылардың сәйкес әріптермен, бірақ ирек жақшамен алынып белгіленеді